把静态数组常量赋值给动态数组...

Question

这样的问题const 
  StaticArray1: array[0..5] of string = ('a', 'b', 'c', 'd', 'e');
  StaticArray2: array[0..4] of string = ('F', 'G', 'H', 'I');proc....
var
  DynamicArray: array of string;
begin
  case ... of
    0:
      DynamicArray:= StaticArray1;  // Error: imcomptible types: "Array" and "Dynamic Array"!
    1:
      DynamicArray:= StaticArray2;
  end;
end;应该怎么赋值?

Answer 1

var a1:array[0..4] of string;
    a2:array of string;
    i:integer;
begin
    for i:=0 to 4 do a1[i]:=inttostr(i);
    a2:=@a1[0];
    showmessage(a2[2]);end;

Answer 2

var a1:array[0..4] of string;
    a2:array of string;
    i:integer;
begin
    for i:=0 to 4 do a1[i]:=inttostr(i);
    a2:=@a1[0];
    showmessage(a2[2]);end;

Answer 3

jinjazz(人雅的标记--落寞刺客) 高手呢