急！急！急！能把一个string类型变量的值传给char类型的数组吗？

Question

怎样能把一个string类型变量的值传给char类型的数组？程序能做到吗？

Answer 1

var
  Achar: array of char;
  Astring: string;
begin
  //perhaps have a FOR loop here
  Achar[i] = Astring[i];end;

Answer 2

HeLiang7的方法可以再详细一下，如下：
var
  Achar: array of char;
  Astring: string;
  i:integer;
begin
   //假设Astring 已经有数值如Astring是"you did a good job"
   setlength(Achar,length(Astring));//设定数组长度，即为它分配内存
   for i:=0 to length(Astring)-1 do
        Achar[i]:=Astring[i+1]; 
   
end;