Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Form moving
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Environment versions
Visual FoxPro:
VFP 9 SP2
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01407630
Message ID:
01407650
Views:
51
>Is there a way to limit form to be moved above some point?
>Like when you dock a toolbar on top of the _screen and you can't move the form below it.
>I tried to put in Moved event this.Top = something but if tje use holds the mouse button and continue drag the mouse there is a very ugly flickering.
>TIA

Borislav,

As far as I understand, flickering is because mouse is still down. See if it is what you need:
*Form.Moved
if This.Top < 100
  DECLARE mouse_event IN Win32API;
     INTEGER dwFlags, INTEGER dx,;
     INTEGER dy, INTEGER cButtons,;
     INTEGER dwExtraInfo

*#define MOUSEEVENTF_LEFTUP      0x0004
	= mouse_event(0x0004, 0, 0, 0, 0)

   CLEAR DLLS

    this.Top = 100
	
ENDIF
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform