[Lazarus] TStrings, Windows and Unicode

Marcos Douglas md at delfire.net
Wed Oct 24 03:25:03 CEST 2012


Hi,

In the example below, running on Windows:
The name of file, after saved, is "atenção.txt" but the content is "atenção".
I understand the filename, i.e, I need to use UTF8ToSys but I do not
understand the valid content.

procedure TForm1.Button1Click(Sender: TObject);
var
  lStrings: TStrings;
begin
  lStrings := TStringList.Create;
  lStrings.Text := 'atenção';
  lStrings.SaveToFile('c:\atenção.txt');
  lStrings.Free;
end;

Thanks,

Marcos Douglas




More information about the Lazarus mailing list