变体数组

为什么80%的码农都做不了架构师？>>>   

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;

 
 
 
 
 

 

 

  

转载于:https://my.oschina.net/hermer/blog/319891