diff options
author | Jedidiah Barber <contact@jedbarber.id.au> | 2024-02-06 21:53:06 +1300 |
---|---|---|
committer | Jedidiah Barber <contact@jedbarber.id.au> | 2024-02-06 21:53:06 +1300 |
commit | c47bea48a24e51e178354f3e3bb53d8b9964b769 (patch) | |
tree | 0235aa00983da4722cc49de315f76d3ea3978026 /src/fltk-draw.ads | |
parent | feef4803ef4cabd6190e5a76c34ccc9866da380d (diff) |
Moved mouse cursors and added cursor functions to FLTK.Draw
Diffstat (limited to 'src/fltk-draw.ads')
-rw-r--r-- | src/fltk-draw.ads | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/fltk-draw.ads b/src/fltk-draw.ads index e287f90..3ec3b94 100644 --- a/src/fltk-draw.ads +++ b/src/fltk-draw.ads @@ -168,6 +168,14 @@ package FLTK.Draw is procedure Set_Color (R, G, B : in Color_Component); + procedure Set_Cursor + (To : in Mouse_Cursor); + + procedure Set_Cursor + (To : in Mouse_Cursor; + Fore : in Color; + Back : in Color := White_Color); + function Get_Font return Font_Kind; |