Re: On_Button_Press_Event in Text_View

["Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>]

On 2024-08-13 13:37, Gavin McCord wrote:

> I have a custom handler used when I update the Text_Buffer:
> 
>   Button_Callback.Connect
>     (Update_Button, "clicked", Update_Clicked'Access,
>      Buffer_To_Pass);
> 
> That works fine so I was imagining something similar might
> be possible, but I've run through various permuations of
> records and access types but not yet got a working callback.
> 
> Any help gratefully received (I can post the full code if
> that's useful).

Something like this:

    package Event_Handlers is
       new Gtk.Handlers.User_Return_Callback
           (  GObject_Record,
              Boolean,
              User_Data_Type
           );


    function On_Button_Press
             (  Object : access GObject_Record'Class;
                Event  : Gdk_Event;
                Data   : User_Data_Type
             )  return Boolean;


    View.Set_Events (View.Get_Events or Button_Press_Mask);
    Event_Handlers.Connect
    (  View,
       "button-press-event",
       Event_Handlers.To_Marshaller (On_Button_Press'Access),
       Data
    );

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de