Тема: Memo & SaveDialog
Показать сообщение отдельно
  #2  
Старый 22.11.2010, 23:54
lmikle lmikle вне форума
Модератор
  
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию
Убери все, кроме первых 2 строчек кода:

Код:
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile(SaveDialog1.FileName);

Этого достаточно.
Ответить с цитированием