diff options
author | Jed Barber <jjbarber@y7mail.com> | 2017-05-01 12:49:40 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2017-05-01 12:49:40 +1000 |
commit | e9dc75679fcac3bf2024e47641941d0a5ef0899d (patch) | |
tree | 49081bd61ecf5aa074b3a59340d9e56eb3d0a2d2 /src/fltk-widgets-inputs.ads | |
parent | 9348c8013431bbd5de165d8fbac13b783d983324 (diff) |
Draw method implemented for Boxes/Inputs
Diffstat (limited to 'src/fltk-widgets-inputs.ads')
-rw-r--r-- | src/fltk-widgets-inputs.ads | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/fltk-widgets-inputs.ads b/src/fltk-widgets-inputs.ads index 0f818ac..c268e72 100644 --- a/src/fltk-widgets-inputs.ads +++ b/src/fltk-widgets-inputs.ads @@ -20,6 +20,10 @@ package FLTK.Widgets.Inputs is private + procedure Draw + (This : in out Input); + + type Input is new Widget with null record; @@ -27,5 +31,8 @@ private (This : in out Input); + package Input_Convert is new System.Address_To_Access_Conversions (Input'Class); + + end FLTK.Widgets.Inputs; |