类型转换问题！

Question

把字符串类型中的某位取出来得到的值还是字符串类型，并存在一个变量D中，需
case d of
这会出错，原因是CASE的条件类型不能为字符串类型。
这该怎么办？字符串类型又不能转字符类型。
哪位有好些的方法，请指都教。谢谢。

Answer 1

var i:integer;
if d='a' then
  i:=0
end;
case i do
...

Answer 2

D是属于什么字符,
如果是非数字字符可以转成ASCII码值,
是数字字符则可用StrToInt(D)
进行转换.

Answer 3

case ord(d) oford('a'):
;
ord('b'):
;
end;

Answer 4

case d[1] of
'0':begin
do...    end;

Answer 5

问题解决了。
 My_first(海浪) 为正确答案！