From d4520de203a8fd8816836b7f8507027cf0675f91 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Wed, 21 Sep 2016 23:34:15 +1000 Subject: More progress on the little utility window layouts --- fltk-widgets-groups-windows.ads | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'fltk-widgets-groups-windows.ads') diff --git a/fltk-widgets-groups-windows.ads b/fltk-widgets-groups-windows.ads index 0999b21..2213563 100644 --- a/fltk-widgets-groups-windows.ads +++ b/fltk-widgets-groups-windows.ads @@ -30,6 +30,13 @@ package FLTK.Widgets.Groups.Windows is Text : in String); + procedure Set_Size_Range + (This : in out Window; + Min_W, Min_H : in Integer; + Max_W, Max_H, Incre_W, Incre_H : in Integer := 0; + Keep_Aspect : in Boolean := False); + + private -- cgit