From 09d9f2f6fc83af3bdc76717941eb13b77b2b1613 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Tue, 20 Mar 2018 01:41:49 +1100 Subject: Moved several Widgets from the Partially list to the Done list --- src/fltk-widgets-valuators.ads | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'src/fltk-widgets-valuators.ads') diff --git a/src/fltk-widgets-valuators.ads b/src/fltk-widgets-valuators.ads index dafcfc3..da22f79 100644 --- a/src/fltk-widgets-valuators.ads +++ b/src/fltk-widgets-valuators.ads @@ -55,6 +55,14 @@ package FLTK.Widgets.Valuators is (This : in out Valuator; To : in Long_Float); + function Get_Step + (This : in Valuator) + return Long_Float; + + procedure Set_Step + (This : in out Valuator; + To : in Long_Float); + function Get_Value (This : in Valuator) return Long_Float; -- cgit