Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
I don't see a necessary function,
Message
From
20/10/2004 11:54:51
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Visual FoxPro Beta
Title:
I don't see a necessary function,
Miscellaneous
Thread ID:
00953036
Message ID:
00953036
Views:
59
On VFP9 updated help i see 3 new functions:
SYS(232{5|6|7})
but:
i have not see these expected functions:
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 nWHANDLE
A workaround for do this is to use BIND+AEVENTS(,1) ?
( but perhaps I am deceived):
* 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 ?

At this point, why do not to add a _FORMS() public collection
that accept hwnd like parameters ?
With this i can do:
? _FORMS(GetParent(m.someHwnd)).Caption
? _FORMS(GetAncestor(m.toolbarHwnd)).Caption
I hope that VFPT consider this.

Fabio

Of course, you do not answer to make to me to loop within _ SCREEN.Forms!
Next
Reply
Map
View

Click here to load this message in the networking platform