OleVariant数据类型如何定义成二维的。(50分)

OleVariant数据类型如何定义成二维的。

vararraycreate

最好有个例子。

A:=VarArrayCreate([0,i-1,0,1],varVariant);

可以用两种方式：
1、用vararraycreate创建，如
var
A: oleVariant;
begin
A := VarArrayCreate([0,2], varVariant);
A[0] := VarArrayCreate([0,1], varVariant);
A[1] := VarArrayCreate([0,1], varVariant);
A[2] := VarArrayCreate([0,1], varVariant);
A[0，0] := 1;
A[0，1] := 2;
A[1，0] := 12.0;
A[1，1] := 100.05;
A[2，0] := 'aaa';
A[2，1] := 'bbb';
end;
2、和普通二维数组一样直接定义
var
a:array[0..2] of array[0..1] of olevariant;
begin
A[0，0] := 1;
A[0，1] := 2;
A[1，0] := 12.0;
A[1，1] := 100.05;
A[2，0] := 'aaa';
A[2，1] := 'bbb';

end;

以上两种方式都行得通，可别忘记给分哟

变体数组的使用很灵活，很难用“二维”、“三维”区分
var
A: Variant;
begin
A := VarArrayCreate([0, 4], varVariant);
//定义一个大小为5的一维变体数组
A[0] := 1;
A[1] := 1234.5678;
A[2] := 'Hello world';
A[3] := True;
A[4] := VarArrayOf([1, 10, 100, 1000]);
//第五项定义为一个数组
end;

多人接受答案了。