Linux get_selection_text
Posted: Sat Feb 22, 2025 7:15 am
Does this work on Linux?
Should I allocate/free memory for a procedure like this?
Thanks
Should I allocate/free memory for a procedure like this?
Thanks
Code: Select all
ImportC ""
gtk_text_buffer_get_selection_content(*buffer.GtkTextBuffer)
EndImport
Procedure.s get_selection_text(gadget)
Protected b = gtk_text_buffer_get_selection_content(gtk_text_view_get_buffer_(GadgetID(gadget))
ProcedureReturn PeekS(b, -1, #PB_UTF8)
EndProcedure
OpenWindow(0, 270, 100, 200, 130, "EditorGadget")
EditorGadget(0, 10, 10, 180, 80, #PB_Editor_WordWrap)
SetGadgetText(0, "The quick brown fox jumps over the lazy dog.")
StartIter.GtkTextIter ; select all
EndIter.GtkTextIter
TextBuffer = gtk_text_view_get_buffer_(GadgetID(0))
gtk_text_buffer_get_start_iter_(TextBuffer, @StartIter)
gtk_text_buffer_get_end_iter_(TextBuffer, @EndIter)
gtk_text_buffer_select_range_(TextBuffer, @StartIter, @EndIter)
Debug get_selection_text(0)
; Repeat:Select WaitWindowEvent():Case #PB_Event_CloseWindow:Break:EndSelect:ForEver