06 2008 档案

创建variant二维数组
摘要：var a:variant; begin a:=VarArrayCreate([0,2,0,2],varVariant); ShowMessage(inttostr(VarArrayDimCount(a))); VarArrayPut(a,'b',[1,1]); ShowMessage(String(VarArrayGet(a,[1,1]))); end; 阅读全文
posted @ 2008-06-30 10:32 ypq 阅读(556) 评论(0) 推荐(0)