Applies to

Drag Source controls.

Description

Contains a number specifying which mouse button was used to start the drag operation. For use with Get_Property only.

Usage

dragButton = Get_Property (dragSource,"DRAGBUTTON")

Returns

A numeric value.

ValueDescription
0Left Mouse button
1Right Mouse button
2Middle Mouse button

See Also

DRAGSOURCE property

Example

Declare function Get_Property
 
* retrieve the DRAGBUTTON property and display data in a message
dragSource = Get_Property("SYSTEM","DRAGSOURCE")
dragButton = Get_Property(dragSource,"DRAGBUTTON")
begin case
   case dragButton = 0
      msgText = "Left mouse button"
   case dragButton = 1
      msgText = "Right mouse button"
   case dragButton = 2
      msgText = "Middle mouse button"
end case
 
msg(@window,"The " :msgText: " was used to start the drag operation")
  • No labels