Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
COPYDATASTRUCT...
Message
 
To
25/11/1998 08:28:33
General information
Forum:
Visual FoxPro
Category:
Windows API functions
Miscellaneous
Thread ID:
00161294
Message ID:
00161561
Views:
82
Hi Philip,

>Does anyone know if VFP 5.0 support the Win32API COPYDATASTRUCT structure? I need to pass a message using WM_COPYDATA, and pass a pointer to Delphi 3.0 to this structure from within VFP.

Sure it does. All you need is a little public domain class that has been developed by Mark Wilden and myself and is currently in beta. You can get a copy if you want. The code would look like this:
ox = Create("COPYDATASTRUCT")
ox.lpData = "Some data!"
ox.cbData = Len(ox.lpData)
SendMessage(hwnd1,WM_COPYDATA,hwnd2,ox.GetPointer())

Define Class COPYDATASTRUCT as Struct
   dwData = 0
   cbData = 0
   lpData = ""
   cmembers = "l:dwData,l:cbData,pz:lpData"
Enddefine
Christof
--
Christof
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform