|
@@ -3494,8 +3494,6 @@ procedure DynArrayFromVariant(var DynArray: Pointer; const V: Variant; TypeInfo:
|
|
|
vararraybounds : PVarArrayBoundArray;
|
|
vararraybounds : PVarArrayBoundArray;
|
|
|
dynarraybounds : tdynarraybounds;
|
|
dynarraybounds : tdynarraybounds;
|
|
|
i : SizeInt;
|
|
i : SizeInt;
|
|
|
- type
|
|
|
|
|
- TDynArray = array of Pointer;
|
|
|
|
|
begin
|
|
begin
|
|
|
VarArrayDims:=VarArrayDimCount(V);
|
|
VarArrayDims:=VarArrayDimCount(V);
|
|
|
|
|
|
svenbarth