3. Свойства и методы формы. Лабораторные Delphi (1)

Spread the love

Основные свойства формы в Delphi

Запустите на выполнение Delphi XE3. Создайте новый проект, выбрав в меню File | New | VCL Forms Application — Delphi. Появится форма нового проекта. Щелкните мышью по новой пустой форме.
Запустите на выполнение пустую форму, щелкнув по кнопке  или нажав клавиши Shift+Ctrl+F9. На экране появится пустая форма, содержащая только заголовочную строку. Закройте форму, щелкнув мышью по кнопке закрытия в заголовке формы , щелкнув правой кнопкой мыши по заголовку формы и выбрав в появившемся контекстном меню строку Закрытьили нажав клавиши Alt+F4.
В окне Object Inspector отображаются свойства и события формы.














Положите на форму с вкладки Standard палитры инструментов Tool Palette компонент ввода текста Edit и кнопку Button. Кнопке задайте надпись (свойство Caption) Заголовок. Форма примет следующий вид:

Дважды щелкните мышью по кнопке Заголовок или, выделив мышью эту кнопку, перейдите в окне Object Inspector на вкладку Events (события) и дважды щелкните мышью справа от события OnClick (событие, возникающее при щелчке пользователем мышью по кнопке). Откроется вкладка редактирования текста Unit1и появится заготовка для обработчика события щелчка по кнопке:

procedure TForm1.Button1Click(Sender: TObject);

begin

end;

Введите оператор, помещающий в заголовок формы текст, набранный пользователем в поле ввода Edit:

procedure TForm1.Button1Click(Sender: TObject);

begin

  Self.Caption := Edit1.Text;

end;

Ключевое слово Self, означающее, что свойство относится к текущей форме, можно опустить.

Запустите программу на выполнение. Введите произвольный текст в Edit1. Щелкните по кнопке Заголовок. В заголовке формы появится набранный вами текст.

Форму можно закрыть, выбрав в системном меню формы вариант Закрыть, нажав клавиши Alt+F4, щелкнув мышью по кнопке закрытия  в заголовке формы. Можно также закрыть форму программным способом, используя метод формы Close().
Положите на форму еще одну кнопку TButton. Присвойте кнопке текст Закрыть.

Для этой кнопки напишите обработчик события щелчка мышью, при котором происходит закрытие формы и завершение работы программы.

procedure TForm1.Button2Click(Sender: TObject);

begin

  Close();

end;

Запустите программу на выполнение, убедитесь, что при щелчке по кнопке Закрытьпроисходит завершение работы программы.

Поскольку закрывается главная (в данном случае единственная) форма программы, происходит завершение работы всего приложения. Чтобы выполнить завершение работы программы из любой формы, нужно вызвать метод Terminate() объекта Application:

Application.Terminate();

Свойство Iconпозволяет задать для формы конкретную пиктограмму, помещаемую в левый верхний угол заголовка формы. Если это свойство не задано, то у формы присутствует иконка по умолчанию.

Выделите в свойствах формы строку Icon, щелкните мышью справа от значения этого свойства по кнопке . Появится окно изменения изображения:







Щелкните по кнопке Load. Появится диалоговое окно открытия файла. Откройте на компьютере подходящий файл с расширением ico.

Щелкните по кнопке OK. Иконка будет помещена в заголовок формы.

Чтобы удалить из формы заданную иконку и вернуть иконку по умолчанию, нужно справа от свойства формы Icon выделить мышью сам текст (Icon) и нажать клавишу Del (удалить). Для удаления иконки можно также вызвать окно изменения изображения (рис. 4) и щелкнуть в нем по кнопке Clear (очистить).

Свойство WindowState задает вид формы при ее первоначальном запуске:

Читать на сайте автора.

/0 Отзывы/от
0 ответы

Ответить

Хотите присоединиться к обсуждению?
Не стесняйтесь вносить свой вклад!

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *