Question

DELPHI 调试环境下怎么查看 OleVariant 数组 类型的数值，多谢

Answer 1

VarToStr()
如果返回的是一个数组的话
var
UTempPoint: Pointer;
UOutArr: array[1..6] of string;//假设返回的是1维数组有6个元素
begin
UTempPoint := VarArrayLock(返回的OleVariant变量);//锁定输出变体数组
try
Move(UTempPoint^,UOutArr[1],6*SizeOf(string));
finally
VarArrayUnlock(UTemp);//解锁
end;
//这时UOutArr[1]..UOutArr[6]里面都是string类型的数据了
//ShowMessage(UOutArr[1]);
end;