16进制的转换问题!!!(100分)

  • 主题发起人 主题发起人 m8858
  • 开始时间 开始时间
M

m8858

Unregistered / Unconfirmed
GUEST, unregistred user!
B8 = 1,
BB = 2,
BA = 3,
BD = 4,
BC = 5,
BF = 6,
BE = 7,
B1 = 8,
B0 = 9,
B9 = 0,

E8 = a,
EB = b,
EA = c,
ED = d,
EC = e,
EF = f,
EE = g,
E1 = h,
E0 = i,
E3 = j,
E2 = k,
E5 = l,
E4 = m,
E7 = n,
E6 = o,
F9 = p,
F8 = q,
FB = r,
FA = s,
FD = t,
FC = u,
FF = v,
FE = w,
F1 = x,
F0 = y,
F3 = z,

C8 = A,
CB = B,
CA = C,
CD = D,
CC = E,
CF = F,
CE = G,
C1 = H,
C0 = I,
C3 = J,
C2 = K,
C5 = L,
C4 = M,
C7 = N,
C6 = O,
D9 = P,
D8 = Q,
DB = R,
DA = S,
DD = T,
DC = U,
DF = V,
DE = W,
D1 = X,
D0 = Y,
D3 = Z,

根据上面的条件 将类似这样的字符串(E8 EB EA ED EC EF) 转换成正常的字母或数字 该怎么做? 请贴代码 谢谢!!!
 
建一个查找表,
Code: Array[0..255] of char;

Code[$B8] := 1;
...
Code[$D3] := Z;

查找直接访问数组即可
 
创建一个对应关系的数组不行吗?
 
多人接受答案了。
 
后退
顶部