>Hi,
>
>SYS(3095) is buggy.
>
>e.g.
>

>DEFINE CLASS oTestCom AS OLEPUBLIC
>
>  FUNCTION SysTest() AS Integer

* try
    RETURN SYS(3095,m.THIS.Application)

>  ENDFUNC
>
>ENDDEFINE
>

>
>compile as COM Exe (or DLL - doesn't matter)
>

>loObj = CREATEOBJECT('comtest.oTestCom')
>?loObj.SysTest() && display's 0
>?SYS(3095,loObj) && displays the actual pointer
>

>
>So one cannot use SYS(3095) within a COM object :( !!