je ne parviens pas à scroller en en fin de text.
J'ai beau tout essayer, j'ai pas réussis ici, Je sais pas. vraiment.
mon code Ada :
Code:
1 2 3 4 5 6 7 8 9 10 11 12
|
GtkAda_Interface_Record(GtkAda_Interface).Main_Window.GnuLinux_Buffer := Get_Buffer(GtkAda_Interface_Record(GtkAda_Interface).Main_Window.GnuLinux_Outputs_Text);
Get_End_iter(GtkAda_Interface_Record(GtkAda_Interface).Main_Window.GnuLinux_Buffer, End_Iter);
Insert(GtkAda_Interface_Record(GtkAda_Interface).Main_Window.GnuLinux_Buffer, End_Iter, Glib.Convert.Locale_to_Utf8(Sub_Command_Type'Image(Sub_Command) & Character'val(10)));
Set_buffer(GtkAda_Interface_Record(GtkAda_Interface).Main_Window.Outputs_Text, GtkAda_Interface_Record(GtkAda_Interface).Main_Window.Outputs_Buffer);
Get_End_iter(GtkAda_Interface_Record(GtkAda_Interface).Main_Window.GnuLinux_Buffer, End_Iter);
Mark := Create_Mark(GtkAda_Interface_Record(GtkAda_Interface).Main_Window.GnuLinux_Buffer, Where => End_Iter);
Scroll_To_Mark(GtkAda_Interface_Record(GtkAda_Interface).Main_Window.GnuLinux_Outputs_Text, mark); |
Je récupère le buffer du text view;
je récupère l'iterateur de fin;
j'insert à la fin.
-- la deuxième get end est peut être pas nécessaire... il y était pas.
je crée une marque.
Je scrolle.
J'ai essayer plein de truc pas moyen, alors qu'ailleurs je scrolle comme je veux.