SaveDialog

[Valerich]

Проблема с сохранением в файл.txt, после открытия этого файла в винде, кодировка нарушена, как исправить?
Он становиться таким:
{\rtf1\ansi\ansicpg1251\deff0\defla ng1049{\fonttbl{\f0\fnil\fcharset20 4{\*\fname Times New Roman;}Times New Roman CYR;}}
\viewkind4\uc1\pard\f0\fs24 1
\par
\par }

[Небесный]

Сообщение от Valerich

Проблема с сохранением в файл.txt, после открытия этого файла в винде, кодировка нарушена, как исправить?
Он становиться таким:
{\rtf1\ansi\ansicpg1251\deff0\defla ng1049{\fonttbl{\f0\fnil\fcharset20 4{\*\fname Times New Roman;}Times New Roman CYR;}}
\viewkind4\uc1\pard\f0\fs24 1
\par
\par }

Вы бы выложили код, как вы сохраняете файл, сложно сказать почему именно у вас происходит данное.

[Valerich]

begin
if sd_1.Execute then//запись в файл + диалоговое оконо
begin
EditFile:=sd_1.FileName;
Document.Lines.SaveToFile(EditFile) ;
Form1.Caption:='Mega_Bloknot - '+ExtractFileName(EditFile);
if Document.Modified then Document.Modified:=false;
end;
end;

[Serge_Bliznykov]

проблема точно не в SaveDialog (он просто имя помогает Вам задать для сохраняемого файла).
похоже, Вы сохраняете RichEdit.Text ...
если это так, то у компонента RichEdit1 есть свойство PlainText, попробуйте установить его перед сохранением в "истину":

  RichEdit1.PlainText := true;

[Valerich]

Сообщение от Serge_Bliznykov

проблема точно не в SaveDialog (он просто имя помогает Вам задать для сохраняемого файла).
похоже, Вы сохраняете RichEdit.Text ...
если это так, то у компонента RichEdit1 есть свойство PlainText, попробуйте установить его перед сохранением в "истину":

  RichEdit1.PlainText := true;

Вот спасибо большое!!!