[gtkada] Problem in GTK ADA

[GOUGOU1]

Hi, i'm french, and my english is not very good.
I've read your e-mail adress at
http://lists.act-europe.fr/pipermail/gtkada/2003-March/002070.html when
i've seeked for information about the widget Gentry.
 
My problem is that when I try to put the string contained in the object,
my programm return to me an "length check error".
 
Here's my code
   procedure Change_Label (Widget : access Gtk_Widget_Record'class) is

      Chaine : UTF8_String(1..20);
   begin
      Chaine := Gtk.Gentry.Get_Text(saisie);
      Gtk.Label.Set_Text(Label,Chaine);
   end Change_Label;
 
I know that I could write 
      Gtk.Label.Set_Text(Label, Gtk.Gentry.Get_Text(saisie));
Instead of put it in a string before, but later, I'll modify this
string.
 
My Gentry object is defined as following :
 
Gtk.Gentry.Set_Max_Length(saisie,20);
 
So, my string "Chaine" as 20 letter, and my Gentry Object to.
Where is the problem ? I'm on it since 4 days, and I don't see where is
the error.
Thanks you
See you
 
GOUGOU1
 
 
 
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: /pipermail/gtkada/attachments/20040208/16cf8745/attachment.htm