Might help you with the debugging:
OLE Drag and Drop | Hacker’s Guide to Visual FoxPro (hackfox.github.io)
<https://hackfox.github.io/section4/s4g830.html>
Might help with specifics:
Using Drag and Drop In Visual FoxPro (aksel.com)
<http://www.aksel.com/whitepapers/DragDrop.htm>
Frank.
Frank Cazabon
On 03/05/2021 3:43 pm, MB Software Solutions, LLC wrote:
Many many moons ago I did some drag and drop code, but I have
forgotten completely and it's no longer in my possession anyway. I
want to drag names amongst a screen full of listboxes:
https://www.screencast.com/t/6M8XxvSFV
I know I need to code in the OLEDragDrop event and native VFP Help
sucks, not really showing me anything.
I was thinking the oDataObject was the listbox where the drag started
but no. I tried to SET STEP ON but VFP says "CANCEL or SUSPEND is not
allowed."
LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord
LOCAL loLB as ListBox
loLB = oDataObject
wait window loLB.ListCount && this fails
SET STEP ON && this doesn't work either
I have the properties set correctly to allow me to drag from one list
to another but now I'm stuck. Going to search the archives next but
throwing this out there in the meantime. Was hoping to have drag/drop
implemented by the time I had a ZOOM call with my fellow hockey
captains to set the teams tonight!
tia,
--Michael
--- StripMime Report -- processed MIME parts ---
multipart/alternative
text/plain (text body -- kept)
text/html
---
_______________________________________________
Post Messages to: ProFox@leafe.com
Subscription Maintenance: https://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: https://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: https://leafe.com/archives
This message:
https://leafe.com/archives/byMID/7cb778e3-f349-b55b-c232-5fc245c1b...@gmail.com
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
