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-boxes.ads | |
| parent | 9348c8013431bbd5de165d8fbac13b783d983324 (diff) | |
Draw method implemented for Boxes/Inputs
Diffstat (limited to 'src/fltk-widgets-boxes.ads')
| -rw-r--r-- | src/fltk-widgets-boxes.ads | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/fltk-widgets-boxes.ads b/src/fltk-widgets-boxes.ads index 00f84d4..feeae91 100644 --- a/src/fltk-widgets-boxes.ads +++ b/src/fltk-widgets-boxes.ads @@ -15,6 +15,10 @@ package FLTK.Widgets.Boxes is private + procedure Draw + (This : in out Box); + + type Box is new Widget with null record; @@ -22,5 +26,8 @@ private (This : in out Box); + package Box_Convert is new System.Address_To_Access_Conversions (Box'Class); + + end FLTK.Widgets.Boxes; |