Drag Source controls.
Contains the client coordinates of the mouse (i.e relative to the control’s client area) when the drag operation started. For use with Get_Property only.
dragPos = Get_Property(dragSource,"DRAGPOS")
An @fm-delimited array of the x position and y position.
| Value | Description |
|---|---|
| <1> | xPos |
| <2> | yPos |
Declare function Get_Property
* retrieve the DRAGPOS property and display data in a message
dragSource = Get_Property("SYSTEM","DRAGSOURCE")
dragPos = Get_Property(dragSource,"DRAGPOS")
msgText = "xPos = ":dragPos<1>: "yPos = ":dragPos<2>
msg(@window,msgText)