Сохранение - Общие вопросы Delphi - Страница 3

Andrei Isaev · 14.12.2008, 14:23

Или можно подругому
if Memo1.Modified then
case MessageDlg('Файл ' + ExtractFileName(SaveDialog1.FileNam e) + ' был изменён. Сохранить?',mtConfirmation, mbYesNoCancel, 0);

KiDoki · 14.12.2008, 14:23

Цитата:

Сообщение от Andrei Isaev

Вот простое решение : в обработчике события OnCloseQuery напиши :
CanClose := MessageDlg('Вы уверены?', mtConfirmation, [mbyes, mnNo],0);
И всё!

Надо ещё спросить сохранять ли текстовый файл.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
сохранение	1234	Общие вопросы Delphi	11	30.08.2008 11:47
TClientSocket - сохранение	JRcoker	Общие вопросы Delphi	4	03.08.2008 00:37
Сохранение страницы	Патрон	PHP	3	28.03.2008 00:00
Сохранение	Lonix	Общие вопросы Delphi	1	22.04.2007 00:15
Сохранение в TXT фйл	M@rsel	Общие вопросы Delphi	6	22.12.2006 16:12

14.12.2008, 14:23	#21
Andrei Isaev Дельфист Пользователь Регистрация: 18.11.2008 Сообщений: 19	Или можно подругому if Memo1.Modified then case MessageDlg('Файл ' + ExtractFileName(SaveDialog1.FileNam e) + ' был изменён. Сохранить?',mtConfirmation, mbYesNoCancel, 0);