关于string 和 char类型的转换问题(60分)

我在delphi的学习中遇到这样一个问题
请问如何将string 类型转换成char 类型
我有
var
buffer:string;
t:string;
begin
buffer:='abcdefg';
t:=copy(buffer,0,1);
//此处没问题，但是我想要t为char型
//因为我下面想用case
如：
case t of
'a':………………
'b':………………
……………………
end;
如果case可用string 就好了
但delphi 的帮助中又有例程
case MyColor of
Red: X := 1;
Green: X := 2;
Blue: X := 3;
Yellow, Orange, Black: X := 0;
end;
这又是为什么？谢谢！

StrCopy();
StrPCopy();
........

可以这样：
var
buffer:string;
t:char;
iCount:integer;
begin
buffer:='abcdefg';
for iCount := 1 to Length(buffer) do
begin
t := buffer[iCount];
case t of
'a': ............
'b': ...........
................
end;
end;
t:=copy(buffer,0,1);

t := buffer[iCount];
是不可以的

case buffer[1] of
a : self.hide;
b :...

多人接受答案了。