immutable class TK_BUTTON_EVENT < $TK_EVENT |
---|
**** | Mouse button related events Egs: The common mouse button events can be specified by
___TK_BUTTON_EVENT::B1__________Click_with_mouse_button_1 ___TK_BUTTON_EVENT::B1.Double___Double_click_with_mouse_button_1 In general: ___TK_BUTTON_EVENT::Press+1______Press_mouse_button_1 ___TK_BUTTON_EVENT::Release+2____Release_mouse_button_2 ___TK_BUTTON_EVENT::Press.Double+1__Double_press_(click)_button_1 |
$TK_EVENT |
const cb_str: STR := "%# @a %b @c @d @f @h @k @m @o @p %s @t @w %x %y @@A @B @E @K @N @R @T @W %X %Y"; |
---|
**** | Same callback string for all button events |
B1: SAME |
---|
**** | Event Creation: Mouse Button 1 press |
B2: SAME |
---|
B3: SAME |
---|
Press: SAME |
---|
**** | Event Creation: Mouse Button press event |
Release: SAME |
---|
**** | Event Creation: Mouse Button release event |
plus(i: INT): SAME |
---|
**** | Add on a detail field onto the event, indicating which button (i). An error if you do this twice or call it after calling one of B1, B2 or B3 |