Re: Error converting from UTF8 to ISO-8859-1

["ldries46" <ldries46@planet.nl>]

Thanks for the help. I'm working on my program again.
The question I send first still is not answered because every time I have an 
error I still get the three converting error in the same file but I the file 
is correct is correctly compiled and in the use of it works correctly.

"Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de> schreef in bericht 
news:i58mu1sn7qag.n2khre66reir$.dlg@40tude.net...
> P.S.
>
> When using GtkAda under GPS, always include gtkada.gpr into your project
> file. In no case you should never ever use the Linker_Options pragma. A
> project file could look like this:
>
> with "gtkada.gpr";  -- Note this
>
> project Escape is
>
>   type Development_Type is ("Debug", "Release");
>   Development : Development_Type := external ("Development", "Debug");
>
>   type Legacy_Type is ("Ada95", "Ada2005");
>   Legacy : Legacy_Type := external ("Legacy", "Ada2005");
>
>   for Main use ("escape.adb");
>
>   package Binder is
>      case Development is
>         when "Debug" =>
>            for Default_Switches ("ada") use ("-E");
>         when "Release" =>
>            for Default_Switches ("ada") use ();
>      end case;
>   end Binder;
>
>   package Builder is
>      case Development is
>         when "Debug" =>
>            for Default_Switches ("ada") use ("-g");
>         when "Release" =>
>            for Default_Switches ("ada") use ("-s");
>      end case;
>   end Builder;
>
>   package Compiler is
>      case Development is
>         when "Debug" =>
>            case Legacy is
>               when "Ada2005" =>
>                  for Default_Switches ("ada") use
>                     ("-gnato", "-gnatf", "-g", "-fstack-check",
> "-gnat05");
>               when "Ada95" =>
>                  for Default_Switches ("ada") use
>                     ("-gnato", "-gnatf", "-g", "-fstack-check",
> "-gnat95");
>            end case;
>         when "Release" =>
>            case Legacy is
>               when "Ada2005" =>
>                  for Default_Switches ("ada") use
>                     ("-gnato", "-gnatf", "-O2", "-gnatn", "-gnat05");
>               when "Ada95" =>
>                  for Default_Switches ("ada") use
>                     ("-gnato", "-gnatf", "-O2", "-gnatn", "-gnat95");
>            end case;
>      end case;
>   end Compiler;
>
>   package Linker is -- Linker switches are here
>      case Development is
>         when "Debug" =>
>            for Default_Switches ("ada") use Gtkada.Linker'Default_Switches
> ("ada") & "-g" & "-mwindows";
>         when "Release" =>
>            for Default_Switches ("ada") use Gtkada.Linker'Default_Switches
> ("ada") & "-O2" & "-mwindows";
>      end case;
>   end Linker;
>
> end Escape;
>
> -- 
> Regards,
> Dmitry A. Kazakov
> http://www.dmitry-kazakov.de