Another option is to use api which I got from another post on Tek-Tips. See this "drag detected" option. I have not had time to test it fully but it's another idea.
PUBLIC objForm
objForm = CreateObject("TForm")
objForm.Visible = .T.
DEFINE CLASS TForm As Form
Width=400
Height=200...
Step 1 - In the mousedown of the container save the top and left to 2 form properties as follows: Thisform.contstartingtop = This.Top
Thisform.contstartingleft = This.Left
Step 2 - In the...
Mike. Regarding thread184-1616416(OLE DragDrop Bug) I also ran into very similar issue. When using the native VFP DragDrop within a formset(which I know your not a fan of) I was experiencing the same issue of having to do "multiple mouse clicks" to stop "what 'appears' to be 'hanging'". I could...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.