From 3f1a529a3b82c322678163cb70a8884fdf3eb920 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Tue, 4 Oct 2016 18:52:32 +1100 Subject: Basic find functionality working --- fltk-widgets-groups-text_displays.ads | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'fltk-widgets-groups-text_displays.ads') diff --git a/fltk-widgets-groups-text_displays.ads b/fltk-widgets-groups-text_displays.ads index bb99e78..84c6551 100644 --- a/fltk-widgets-groups-text_displays.ads +++ b/fltk-widgets-groups-text_displays.ads @@ -56,6 +56,20 @@ package FLTK.Widgets.Groups.Text_Displays is Size : in Font_Size); + function Get_Insert_Position + (This : in Text_Display) + return Natural; + + + procedure Set_Insert_Position + (This : in out Text_Display; + Pos : in Natural); + + + procedure Show_Insert_Position + (This : in out Text_Display); + + private -- cgit