• Главная
  • Исходники Delphi
  • Справочники Delphi
  • Книги Delphi
  • Основы Delphi
  • библиотека Delphi исходников
  • Форум
  • Блоги

Последние записи

  • Геопозиция
  • Колесо фортуны на javascript
  • Вычислить формулу Тейлора на ассемблере
  • Отловить число загружаемых файлов php
  • Вывод текста и числа в одной строке
  • Wapuula — лучший многоцелевой WordPress шаблон бизнес тематики
  • Прокрутка внутри элемента
  • Маркетплейс TemplateMonster приглашает к сотрудничеству разработчиков шаблонов
  • Программа по отправке и принятию UDP пакетов
  • Шаблон Monstroid 2 стал лучшим решением для создания WordPress сайтов

made in programmersforum 8

programmersforum8

  • .NET
  • ASP.NET
  • assembler
  • Basic
  • c/c++
  • CMS
  • Delphi
  • HTML
  • iPhone
  • Java
  • JavaScript
  • Linux
  • Pascal
  • Perl
  • Photoshop
  • php
  • Python
  • Ruby
  • SEO
  • sql
  • VBA
  • Win Api
  • Windows
  • XML и XSLT
  • Администрирование ОС
  • Апгрейды
  • Архив
  • Безопасность
  • Блоги
  • Веб-аналитика
  • Железо
  • Журнал
  • Заметки
  • Имейдж
  • Интервью
  • Исходники
  • Новости
  • Общалка
  • Операционные системы
  • Пост-обзор
  • Профлитература
  • Рассылка
  • Реклама
  • си шарп
  • Советы
  • Софт
  • Статьи
  • Топик-обзор
  • Файлы








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;

тема на форуме

Похожие статьи

  • Как вставить перевод строки #10#13 в текст RichEdit?
  • Координаты коретки RichEdit
  • Верхний и нижний отступ RichEdit
  • Найти и раскрасить нужное слово в RichEdit
  • После загрузки файла в RichEdit подобрать ширину по содержимому
  • Выделить строку RichEdit жирным
  • Как сохранить текст из 4х RichEdit в файл?
  • Вставить TBitMap в RichEdit
  • Преобразовать текст в поток и обратно
  • Узнать свободное место на указанном диске
Теги: MessageDlg | RichEdit | richedit1.Lines | SaveDialog1.Execute | сохранение данных








© Copyright "Клуб программистов" – материалы по Delphi и С++. Создание и продвижние сайта - Веб-сателлит.