diff options
Diffstat (limited to 'spec/fltk-widgets-groups-browsers.ads')
-rw-r--r-- | spec/fltk-widgets-groups-browsers.ads | 33 |
1 files changed, 10 insertions, 23 deletions
diff --git a/spec/fltk-widgets-groups-browsers.ads b/spec/fltk-widgets-groups-browsers.ads index d7b0498..c735fa2 100644 --- a/spec/fltk-widgets-groups-browsers.ads +++ b/spec/fltk-widgets-groups-browsers.ads @@ -56,7 +56,7 @@ package FLTK.Widgets.Groups.Browsers is - -- Access to the Browser's self contained scrollbars + -- Attributes -- function H_Bar (This : in out Browser) @@ -69,7 +69,7 @@ package FLTK.Widgets.Groups.Browsers is - -- Item related settings + -- Items -- function Set_Select (This : in out Browser; @@ -135,7 +135,7 @@ package FLTK.Widgets.Groups.Browsers is - -- Scrollbar related settings + -- Scrollbar Settings -- function Get_Scrollbar_Mode (This : in Browser) @@ -178,7 +178,7 @@ package FLTK.Widgets.Groups.Browsers is - -- Text related settings + -- Text Settings -- function Get_Text_Color (This : in Browser) @@ -207,7 +207,7 @@ package FLTK.Widgets.Groups.Browsers is - -- Graphical dimensions and redrawing + -- Dimensions, Redrawing -- procedure Resize (This : in out Browser; @@ -231,6 +231,8 @@ package FLTK.Widgets.Groups.Browsers is + -- Optional Overrides -- + -- You may override these subprograms to change the behaviour of the widget -- even though these are called from within FLTK. @@ -254,6 +256,8 @@ package FLTK.Widgets.Groups.Browsers is + -- Mandatory Overrides -- + -- You MUST override these subprograms if deriving a type from Browser or your -- program will crash, since they are called from within FLTK and do not have -- any implementations given. By default here they will raise an exception. @@ -318,7 +322,7 @@ package FLTK.Widgets.Groups.Browsers is - -- Cache invalidation + -- Cache Invalidation -- procedure New_List (This : in out Browser); @@ -340,20 +344,6 @@ package FLTK.Widgets.Groups.Browsers is A, B : in Item_Cursor); - - - -- You may override these subprograms to change the behaviour of the widget - -- even though these are called from within FLTK. - - procedure Draw - (This : in out Browser); - - function Handle - (This : in out Browser; - Event : in Event_Kind) - return Event_Outcome; - - private @@ -456,9 +446,6 @@ private pragma Inline (Replacing); pragma Inline (Swapping); - pragma Inline (Draw); - pragma Inline (Handle); - end FLTK.Widgets.Groups.Browsers; |