Последние записи
- Почему я не Цукерберг?
- Регулярные выражения findall — найти позиции вхождения подстроки в строку
- Удалить повторяющиеся элементы из массива (VBA в Excel)
- Сравнить значения в TRxDBGrid
- Определить слова наибольшей и наименьшей длины (VBA в Microsoft Office Excel)
- Массив с Фибоначчи. Создание массива с произведением элементов Фибоначчи — Microsoft Office Excel
- Импорт таблицы Word на лист Excel
- Изменение имени файла в C# (си шарп)
- Поле и вычисления в запросе (SQL в Access)
- Описать функцию Pi(eps), вычисляющую значение числа Пи по формуле
29th
Авг
Сохранение при выходе из программы
Posted by Chas under Delphi
Работаю над текстовым редактором. Сохранение по идее должно идти по такой схеме:
«Если RichEdit заполнен, то Спрашиваем, иначе просто Выход»
Stilet
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if (trim(RichEdit.Lines.Text)<>'') and
(MessageDlg('Документ не сохранен. Сохранить документ?', mtInformation, [mbYes, mbNo], 0) = mrYes ) and
(SaveDialog1.Execute) then
richedit1.Lines.SaveToFile(SaveDialog1.FileName)
end;Похожие статьи
