本文整理自网络,侵删。
变体数组
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;
相关阅读 >>
Delphi 用 directshow 获取本机的视频摄像设备列表
Delphi tokyo 版本 twebbrowser 的一个问题(bug?)
Delphi tcolortohex 与 hextotcolor
更多相关阅读请进入《Delphi》频道 >>