如何将TList的值赋给一个variant变量？
如题

[解决办法]
TList的Items属性吗？ 说清楚一些, 如果是Items是不行的, 因为Variant不支持指针.
[解决办法]
a: variant;
b: TList;
begin
...
a := integer(b);
//存的是list的指针，如果要存list中的内容，看楼下
[解决办法]
var
i: integer;
a: variant;
b: TList;
begin
b := TList.Create;
b.Add(Pointer(111));
b.Add(Pointer(222));
b.Add(Pointer(333));

a := VarArrayCreate([0, b.Count - 1], varVariant);
for i := 0 to b.Count - 1 do
a[i] := integer(b[i]);

for i := 0 to VarArrayHighBound(a, 1) do
showmessage(inttostr(a[i]));

b.Free;

to cncharles(旺仔) ,指针就当它是integer型