Source position: vdi.pas line 88
procedure vq_tdimensions(
handle: SmallInt;
out xdimension: SmallInt;
out ydimension: SmallInt
);