QueryObject in Blitz3D?

Hi does any one know how to do what the Blitz+ QueryObject command does in Blitz3D?

I am using the mouse pointer code in the archives and there is one function that needs that command to stop Windows resetting the pointer:

Function DisablePointerReset(Window)
Local hWnd
Local GCL_HCURSOR = -12
hWnd = QueryObject(Window, 1)
SetClassLong(hWnd, GCL_HCURSOR, 0)
End Function

Thanks.

SystemProperty("AppHwnd") will give the HWND pointer to the runtimewindow, like blitz+ QueryObject()

kev

Thanks, Kev.