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-text_buffers.ads | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'fltk-text_buffers.ads') diff --git a/fltk-text_buffers.ads b/fltk-text_buffers.ads index eea9b73..0bb881e 100644 --- a/fltk-text_buffers.ads +++ b/fltk-text_buffers.ads @@ -75,6 +75,15 @@ package FLTK.Text_Buffers is Name : in String); + function Search_Forward + (This : in Text_Buffer; + Start_At : in Natural; + Item : in String; + Found_At : out Natural; + Match_Case : in Boolean) + return Boolean; + + procedure Set_Selection (This : in out Text_Buffer; Start, Finish : in Natural); -- cgit