如何将字符串类型转成字符类型????????????????????????????????????????????????????????
例如
varstr:string;
char1:char;
..
...
...
begin
  //截取一个字符
 str:= copy(edit1.text,1,1);
 char1:=str; 
如果执行 char1:=str; 就会出错,如何将字符串类型转成字符类型?