Текстовый файл открывается не корректно.

[newd]

Здравствуйте.
На форме имеются: RichEdit1; OpenDialog1; Button1.
Код:
procedure TMainForm.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
RichEdit1.Lines.LoadFromFile(OpenDi alog1.FileName);
end;
end;

После нажатия на кнопку, любой текстовый файл(.txt или .rtf) открывается примерно в таком виде:
\par \f1 \f2\'c2\'f1\'e5\'ec \'e8\'e7\'e2\'e5\'f1\'f2\'ed\'e0 \'ef\'ee\'e3\'ee\'e2\'ee\'f0\'ea\'e 0 \f1\'ab\f2\'ce\'f2 \'f2\'fe\'f0\'fc\'ec\'fb \'e8 \'ee\'f2 \'f1\'f3\'ec\'fb \'ed\'e5 \'e7\'e0\'f0\'e5\'ea\'e0\'e9\'f1\'f f\f1\'bb, \f2\'ee\'e7\'ed\'e0\'f7\'e0\'fe\'f9 \'e0\'ff, \'f7\'f2\'ee \'e4\'e0\'e6\'e5 \'f7\'e5\'eb\'ee\'e2\'e5\'ea, \'ed\'e8\'ea\'e0\'ea \'ed\'e5 \'f1\'e2\'ff\'e7\'e0\'ed\'ed\'fb\'e 9 \'f1 \'ea\'f0\'e8\'ec\'e8\'ed\'e0\'eb\'f c\'ed\'fb\'ec \'ec\'e8\'f0\'ee\'ec, \'ee\'e4\'ed\'e0\'e6\'e4\'fb \'ec\'ee\'e6\'e5\'f2 \'ee\'ea\'e0\'e7\'e0\'f2\'fc\'f1\'f f \'e7\'e0 \'f0\'e5\'f8\'e5\'f2\'ea\'ee\'e9. \'c8 \'e2 \'fd\'f2\'ee\'ec \'f1\'eb\'f3\'f7\'e0\'e5 \'ed\'e5 \'e2\'e0\'e6\'ed\'ee, \'ea\'e0\'ea\'ee\'e2\'e0 \'ed\'e0\'f1\'f2\'ee\'ff\'f9\'e0\'f f \'ef\'f0\'e8\'f7\'e8\'ed\'e0 - \'f1\'e5\'f0\'fc\'e5\'e7\'ed\'ee\'e 5 \'ed\'e0\'f0\'f3\'f8\'e5\'ed\'e8\'e 5 \'e7\'e0\'ea\'ee\'ed\'e0 \'e8\'eb\'e8 \'ee\'f8\'e8\'e1\'ea\'e0 \'f1\'eb\'e5\'e4\'f1\'f2\'e2\'e8\'f f: \'f7\'e5\'eb\'ee\'e2\'e5\'ea \'ee\'ea\'e0\'e7\'e0\'eb\'f1\'ff \'e2 \'f2\'fe\'f0\'fc\'ec\'e5, \'e8 \'e5\'ec\'f3 \'ef\'f0\'e8\'e4\'e5\'f2\'f1\'ff \'ef\'f0\'ee\'e2\'e5\'f1\'f2\'e8 \'e2 \'ed\'e5\'e9 \'ea\'e0\'ea\'ee\'e5-\'f2\'ee \'e2\'f0\'e5\'ec\'ff...
При повторном нажатии на кнопку и выборе этого-же файла, все открывает как надо.
Подскажите пожалуйста, в чем дело.

[Кольша]

may be:

procedure TMainForm.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
RichEdit1.Lines.clear;
RichEdit1.Lines.LoadFromFile(OpenDi alog1.FileName);
end;
end;

[newd]

Спасибо, к сожалению не помогает. Может быть проблема в операционке (Windiws 7) ?

[FleXik]

PlainText поставь в True

У самого недавно эта же проблема была с сохранением в .txt, нагуглил про PlainText, помогло.

[newd]

PlainText в True поставил, все равно при открытии .txt или .rtf не помогает, все та-же проблема. С сохранением все в порядке.

[Пепел Феникса]

а какая версия ДЕлфи у вас?

[newd]

У меня Delphi 7, а ОС Windows 7 x 64. Установлено обновление (Windows6.0-KB947562-x86) для того, что-бы работала справочная система при нажатии F1. До установки обновления F1 не работала.

[Пепел Феникса]

Delphi 7 слишком стара для этой системы.
не стоит её применять без крайней нужды.

[newd]

Спасибо всем. Буду пробовать Среду Разработки посвежее.