Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Проблема с UTF-8

Автор: Dimon 20.7.2004, 17:59

Как сохранить данные из memo или richedit в формате utf-8? (Через lines.savetofile)

Автор: Girder 20.7.2004, 19:15

Прикольно

: У одних на один топик несколько вопросов, а у тебе на один вопрос несколько топиков.
Будь внимателен

Установи в дизайне для Memo: OEMConvert в false;

Лови:

Код


procedure TForm1.Button1Click(Sender: TObject);
var s:string;
      //u:Utf8string;
begin
 s:=Memo1.Lines.Text;
 Memo1.Lines.Text:=AnsiToUtf8(s);
 Memo1.Lines.SaveToFile('E:\Girder.txt');
 Memo1.Lines.Text:=s;
end;

Удачи.

Автор: Dimon 23.7.2004, 11:23

Спасибо!