Source position: varutilh.inc line 40
function SafeArrayCreate(
VarType: dword;
Dim: dword;
const Bounds: TVarArrayBoundArray
):PVarArray;