使用Delphi从VarArray获取数据

Question

我有一个WebService,它返回一个Variant me,它有一个Array即varArray,想知道如何获取varArray的数据.

谢谢您的帮助.

Answer 1

要获取varArray的内容,必须使用VarArrayLowBound和VarArrayHighBound函数,然后使用循环,您可以迭代数组以获取数据.

试试这个样本

var
 i : integer;
 s : string; 
begin
  for i := VarArrayLowBound(vArray, 1) to VarArrayHighBound(vArray, 1) do
    s:=vArray[i];//copy the the content of the array i element into a string