Re: [lazarus] utf8toansi and others seem don't work

[fedorax]

I confirm my precedent message. i just do a test with an older version of
lazarus and FPC and the application above work, with newers versions the same
program do nothing and don't report any errors. I've also test with fedora 6.
-----------------------------------------------------------------------
unit testutf;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls;

type

  { TForm1 }

  TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    Edit2: TEdit;
    procedure Button1Click(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end;

var
  Form1: TForm1;

implementation

{ TForm1 }

procedure TForm1.Button1Click(Sender: TObject);
begin
  edit2.text:=Utf8ToAnsi(Edit1.Text);
  ShowMessage(AnsiToUtf8(Edit1.text));
end;

initialization
  {$I testutf.lrs}

end.

_________________________________________________________________
     To unsubscribe: mail [EMAIL PROTECTED] with
                "unsubscribe" as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives