delphi 变体数组

变体数组
var
Arr: array[0..3] of Variant;
begin
Arr[0] := 123;
Arr[1] := 'wy';
Arr[2] := True;
Arr[3] := VarArrayOf([1,'wanyi',1.5]); //变体数组的元素也可以是变体数组

ShowMessage(Arr[0]); //123, 不需要转换
ShowMessage(Arr[1]); //wy
ShowMessage(Arr[2]); //True
ShowMessage(Arr[3][1]); //wanyi
end;