Help?

Question

vararraycreate:
在那个里边，为什么我运行时候总是同不过！

Answer 1

var  A: Variant;
begin
  A := VarArrayCreate([0, 4], varVariant);
  A[0] := 1;
  A[1] := 1234.5678;
  A[2] := 'Hello world';
  A[3] := True;
  A[4] := VarArrayOf([1, 10, 100, 1000]);
  WriteLn(A[2]); { Hello world }
  WriteLn(A[4][2]); { 100 }end;

Answer 2

var
  A: array of Variant;

Answer 3

其实我知道答案的！
按F!之后，出现了
unit variant!
在Form 中添加：
use vaiant;
就Ok了！