> Compiling .\winunits-base\src\typelib.pas > typelib.pas(371,71) Hint: Local variable "Handle" does not seem to be > initialized > typelib.pas(493,33) Hint: Local variable "sl" does not seem to be > initialized > typelib.pas(562,48) Hint: Local variable "sMethodName" does > not seem to > be initialized > typelib.pas(609,46) Hint: Local variable "sVarName" does not > seem to be > initialized > typelib.pas(1034,40) Hint: Local variable "senum" does not seem to be > initialized > typelib.pas(1097,37) Hint: Local variable "sl" does not seem to be > initialized > typelib.pas(1138,40) Hint: Local variable "slref" does not seem to be > initialized > typelib.pas(1207,48) Hint: Local variable "srecordname" does > not seem to > be initialized > typelib.pas(1224,50) Hint: Local variable "smembername" does > not seem to > be initialized > typelib.pas(1346,32) Hint: Local variable "sl" does not seem to be > initialized > typelib.pas(1353,48) Error: range check error while > evaluating constants > (-1 must be between 0 and 4294967295)
Can you raise a mantis issue? I'll fix this. According to msdn http://msdn.microsoft.com/en-us/library/cc237755%28v=prot.10%29.aspx the function ITypeInfo::GetRefTypeOfImplType is defined as HRESULT GetRefTypeOfImplType( [in] UINT index, [out] HREFTYPE* pRefType ); index: MUST be a nonnegative integer, or -1. Ludo _______________________________________________ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
