SYS(232{5|6|7})but:
SYS(2328,nHwnd) * Return the Form/Toolbar object with nHwnd * ( if it is the WCLIENTWINDOW HWND of a AS Top form, * i expected the form ( window frame ) object ) SYS(2329,nWHANDLE) Return the Form/Toolbar object with nWHANDLEA workaround for do this is to use BIND+AEVENTS(,1) ?
* implement SYS(2328,m.nHwnd) PROCEDURE SYS_2328 =BINDEVENT(m.nHwnd,nNopeMessage,odelegate,"Getform") PRIVATE hWndObject =Sendmessage(m.nHwnd,m.nNopeMessage,0,0) DOEVENTS RETURN m.hWndObject ENDPROC PROCEDURE odelegate.Getform PRIVATE aWMsg AEVENTS(aWMsg,1) hWndObject = aWMsg[3] and * A long run for a little result!Have I to use API API Library Construction for do this simple task ?
? _FORMS(GetParent(m.someHwnd)).Caption ? _FORMS(GetAncestor(m.toolbarHwnd)).CaptionI hope that VFPT consider this.