var
  a:string;
  b:array of char;a:=string(b);

解决方案 »

  1.   

    var
      sTemp1, sTemp2: array of String;
    begin
      SetLength(sTemp1, 3);
      sTemp1[0]:='0';
      sTemp1[1]:='1';
      sTemp1[2]:='2';  sTemp2:=Copy(sTemp1);或者var
      sTemp1, sTemp2: array of String;
    begin
      SetLength(sTemp1, 3);
      sTemp1[0]:='0';
      sTemp1[1]:='1';
      sTemp1[2]:='2';  sTemp2:=Copy(sTemp1, 1, 2); //只拷贝两个。以下在Delphi6中编译不过:(
    var
      sTemp1: array of String;
      sTemp2: array of String;
    begin
      SetLength(sTemp1, 3);
      sTemp1[0]:='0';
      sTemp1[1]:='1';
      sTemp1[2]:='2';  sTemp2:=Copy(sTemp1);