From 577c8306c16b756ba1bf0106b300cc5dc8af21bc Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sun, 6 Aug 2017 13:34:40 +1000 Subject: Some mouse functions added to FLTK.Event --- src/fltk-event.ads | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) (limited to 'src/fltk-event.ads') diff --git a/src/fltk-event.ads b/src/fltk-event.ads index 7a640fe..fc6fafb 100644 --- a/src/fltk-event.ads +++ b/src/fltk-event.ads @@ -7,5 +7,23 @@ package FLTK.Event is return Shortcut_Key; + + + function Mouse_X + return Integer; + + function Mouse_X_Root + return Integer; + + function Mouse_Y + return Integer; + + function Mouse_Y_Root + return Integer; + + function Is_Click + return Boolean; + + end FLTK.Event; -- cgit