From 4b2b1c8d6e85760bc2d5f65f52a122a2ea1e542d Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sun, 13 Nov 2016 22:23:47 +1100 Subject: Added find next and find previous --- fltk-text_buffers.ads | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (limited to 'fltk-text_buffers.ads') diff --git a/fltk-text_buffers.ads b/fltk-text_buffers.ads index 171fd84..582de1d 100644 --- a/fltk-text_buffers.ads +++ b/fltk-text_buffers.ads @@ -86,11 +86,26 @@ package FLTK.Text_Buffers is return Boolean; + function Search_Backward + (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); + function Get_Selection + (This : in Text_Buffer; + Start, Finish : out Natural) + return Boolean; + + -- only takes into account newline characters, not word wrap function Skip_Lines (This : in out Text_Buffer; -- cgit