From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,XPRIO autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: a07f3367d7,dea3b09c039d0609,start
X-Google-Attributes: gida07f3367d7,public,usenet
X-Google-NewGroupId: yes
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news2.google.com!news1.google.com!news.glorb.com!feeder.erje.net!border1.nntp.ams.giganews.com!border2.nntp.ams.giganews.com!nntp.giganews.com!pfeed09.wxs.nl!newsfeed.kpn.net!pfeed14.wxs.nl!pfeed15.wxs.nl!not-for-mail
From: "ldries46" <ldries46@planet.nl>
Newsgroups: comp.lang.ada
Subject: Error converting from UTF8 to ISO-8859-1
Date: Wed, 29 Jul 2009 17:11:35 +0200
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.5512
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5579
X-RFC2646: Format=Flowed; Original
Message-ID: <4a70669a$0$13417$703f8584@news.kpn.nl>
NNTP-Posting-Host: 86.88.17.1
X-Trace: 1248880282 news.kpn.nl 13417 86.88.17.1:60845
X-Complaints-To: abuse@planet.nl
X-Original-Bytes: 2457
Xref: g2news2.google.com comp.lang.ada:7404
Date: 2009-07-29T17:11:35+02:00
List-Id: <comp.lang.ada>

I suddenly got the error mentioned in the title.
I am trying to connect a "clicked" signal from a button in a dialog to a 
routine that executes some function. The code I have so far for the 
Initialize routine of the dialog is:

   procedure Initialize (Wall_Color : access Wall_Color_Record'Class) is
      pragma Suppress (All_Checks);
      Pixmaps_Dir : constant String := "pixmaps/";
      ColorSelection : Gtk_Color_Selection;
      OK : Gtk_Button;
      Cancel : Gtk_Button;
      Help : Gtk_Button;
   begin
      Gtk.Color_Selection_Dialog.Initialize (Wall_Color, -"Wall Color");
      Set_Border_Width (Wall_Color, 5);
      Set_Title (Wall_Color, -"Wall Color");
      Set_Position (Wall_Color, Win_Pos_None);
      Set_Modal (Wall_Color, False);
      Set_Resizable (Wall_Color, False);
      ColorSelection := Get_ColorSel (Wall_Color );
      OK := Get_OK_Button (Wall_Color);
      Cancel := Get_Cancel_Button (Wall_Color);
      Help := Get_Help_Button (Wall_Color);
      Set_Current_Color( ColorSelection, Current_Color );
      Button_CallBack.Connect(OK, "clicked", 
On_WallFloorOK_Activate'Access);
   end Initialize;
When  I outcomment the line Button.Connect etc. the package with this 
function compiles without errors. Once the line is also compiled I get the 
error when opened always on the lines 37:0, 38:0 and 39:0 with the 
descriprion Invalid byte sequence in conversion input. In this case these 
lines are:
      Help : Gtk_Button;
   begin
      Gtk.Color_Selection_Dialog.Initialize (Wall_Color, -"Wall Color");
but when I add multiple lines comments or code for instance on line 20 etc. 
the line nr's of the error stay the same 37, 38 and 39.
I now cannot search further to solve my connect problem.

L. Dries