DRAGBUTTON Property

Drag Source controls.

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

dragButton = Get_Property(dragSource,"DRAGBUTTON")

A numeric value.

ValueDescription
0Left Mouse button
1Right Mouse button
2Middle Mouse button
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")
  • guides/programming/programmers_reference_manual/dragbutton.txt
  • Last modified: 2024/06/19 20:20
  • by 127.0.0.1