Voilà, c'est encore moi.
Bref, je voudrais saovir s'il est possible de passer des paramètres à une fonctions lorsqu'on l'appelle par un callback
Code :
- -- Définition des callbacks
- package Handlers is new Gtk.Handlers.Callback
- (Widget_Type => Gtk.Widget.Gtk_Widget_Record);
- package Return_Handlers is new Gtk.Handlers.Return_Callback
- (Widget_Type => Gtk.Widget.Gtk_Widget_Record,
- Return_Type => Boolean);
|
Code :
- Handlers.Connect(bouton(1) ,"clicked",Handlers.To_Marshaller(Bt_1'access));
|
voilà ce que je fais d'habitude.
Ah oui
Bt1 est défini comme ci :
Code :
- procedure Bt_1(widget : access Gtk_Widget_Record'class) is
- begin
- put_line("hello" );
- end Bt_1;
|
Par exemple, je voudrais pouvoir spécifier la chaine à afficher quand je clique sur le bouton. Je voudrais donc savoir si c'ets possible, et si oui, comment m'y prendre.
J'ai éssayé en faisant un truc comme çà:
Code :
- procedure Bt_1(widget : access Gtk_Widget_Record'class; char : in character) is
- begin
- put_line(char);
- end Bt_1;
|
et
Code :
- Handlers.Connect(bouton(1) ,"clicked",Handlers.To_Marshaller(Bt_1'access),'a');
|
mais il y a une erreur dans la liste des paramètres. Il doit surement y avoir un moyen, mais je ne vois pas comment.
@++