Delphi. Урок 4.2. TForm - это тоже компонент Delphi |
Автор megabax | |||||
20.06.2009 г. | |||||
Некоторые возможности формы (Form - это тоже компонент Delphi).Продолжим создание текстового редактора. В предыдущей статье я рассказал о том, как сделать меню и как загрузить из файла текст в компонент Memo. Теперь по изучаем немножко возможности формы. Давайте в обработчик события OnClick внесем некоторые изменения. В частичности, вместо
сделаем
Запустим программу. Теперь, когда мы открываем другой файл, у нас его имя отобразиться в заголовке окна.
Далее, в обработчик событий формы CloseQuery введем такой текст:
Сам текст обработчика события выглядит теперь вот так*:
Разберем его по подробнее. Слово procedure обозначает описание предопределенной процедуры, подпрограммы. Иными словами, можно один раз описать текст программы, состоящий из нескольких слов, а уже потом из другого места программы несколько раз вызывать его по имени. В этом случае не нужно будет каждый раз заново писать эти строки. Но, в данном случает, данная подпрограмма вызывается прозрачно, незаметно для разработчика. А именно тогда, когда пользователь хочет закрыть окно. Мы у него спрашиваем, действительно ли он хочет выйти из программы, и если да, то параметры CanClose присваиваем true, иначе false. В последнем случае, система, проверив значение параметра CanClose, не станет закрывать окно. Давайте испытаем. Запустим программу и попытаемся закрыть окно:
Теперь напишем процедуру сохранения текста в файл. Добавить в меню еще один пункт с заголовком «Сохранить» и идентификатором «itSave». Так же положим на форму диалог сохранения файла и присвоим ему идентификатор sdSaveDialog. Укажем ему свойства DefaultExt и Filter аналогично диалогу открытия файла*.
В обработчик OnClick пунта меню itSave введем следующий текст:
Теперь мы можем в нашем редакторе не только загрузить текстовый файл, но еще и сохранить. Следует еще заметить, то объекты бывают как визуальные, так и не визуальные. В частичности, OpenDialog и SaveDialog относятся к не визуальным компонентам. Мы их кладем на форму, но при запуске программы на форме то их нет. Данные компоненты нужны только для вызова соответствующих диалогов.
Скриншоты, помеченные знаком * , являются цитатами и иллюстрациями программного продукта "Delphi", авторское право на который принадлежит "Borland Software Corporation".
|
|||||
Последнее обновление ( 01.07.2012 г. ) |
« След. | Пред. » |
---|