[gtkada] Clist and only one column

Rob Groen robgr at xs4all.nl
Wed Feb 12 06:13:23 CET 2003


Why not try:


   declare
      function "+" (S : in String)
         return Interfaces.C.Strings.Chars_Ptr
         renames Interfaces.C.Strings.New_String;
      String_Array : Gtkada.Types.Chars_Ptr_Array :=
            (1 => +Get_Element (List));
   begin
      Row := Append (Gui_Help_Window.Section_Clist, String_Array);
      Free (String_Array);
   end;

Then you have only one element in your Chars_Ptr_Array. BTW the '1 => ' is crucial to the compiler....!

Rob
-------------- next part --------------
An HTML attachment was scrubbed...
URL: /pipermail/gtkada/attachments/20030212/cf198cd7/attachment.htm 


More information about the gtkada mailing list