Создание и использование форм

Формы.

Begin

While not(eof(F)) do

Begin

Then

If OpenDialog1.Execute and FileExists(OpenDialog1. FileName)

Begin

Var

F:TextFile; s:string;

// диалог на отбор текстовых файлов и анализ результатов

// результат – успешный, открываем файл

AssignFile(F, OpenDialog1. FileName);

Reset (F);

Memo1.Lines.Clear; // очищаем Memo1

Readln(F,s);

Memo1.Lines.Add(s); // заполняем Memo1

end;

Closefile(F);

End;

end;

Самый важный визуальный компонент – это форма. В каждом проекте Delphi предусмотрена хотя бы одна форма, которая определяет главное окно приложения («форма» и «окно» синонимы). В иерархии визуальных компонентов между классами TWinControl и TForm есть еще 2 компонента класса: TScrollingWinControl и TCustomForm.

Первый из них называют оконный элемент управления с полосами прокрутки. Они появляются тогда, когда в клиентской области не помещаются дочерние компоненты.

Второй класс TCustomForm – это готовая форма. Инициализация форм приложения может осуществляться разными способами. Если форма добавляется к приложению во время визуального проектирования, то в форме проекта записывается вызов метода Application.CreateForm. При этом форма будет подчинена объекту Application, он самый главный в приложении. Первая включенная форма объявляется главной.

Компонент класса TFORM

Некоторые свойства формы:

Active:Boolean – содержит True, если окно активно;

BorderIcons: TBorderIcons - определяет наличие кнопок в заголовке окна;

BorderStyle: TFormBorderStyle – определяет стиль рамки окна;

ModlResult: TModlResult – для модального окна содержит результат диалога.

Некоторые методы формы:

Procedure Close – закрывает окно, для главного окна завершает работу программы;

Procedure SetFocus – передает фокус ввода форме;

Procedure Show – показывает ворму в немодальном режиме;

Function ShowModal – показывает окно в модальном режиме и возвращает результат диалога.

Некоторые события формы:

OnActivate – возникает в момент активизации окна;

OnCreate – возникает при создании окна, но до появления его на экране;

OnResize – возникает при изменении размеров окна;

OnShow – возникает при появлении окна на экране.

Для подключения новой формы к проекту достаточно обратиться к репозиторию и выбрать нужную разновидность формы. Самая первая форма подключенная к проекту (стандартное имя формы Form1) становится главным окном программы. Главная форма отличается от других:

1. Она автоматически появляется на экране при запуске программы.

2. Закрытие главной формы означает завершение выполнения приложения.

Любое окно можно сделать главным. Для этого нужно обратиться к опции Projects| Options и раскрыв список Mainform, выбрать нужную форму (рис. 2).

Рис. 1. Окно управления проектом

Когда программа работает со многими окнами, каждое следующее окно становится видно только после обращения к его методу Show или Showmodal. Чтобы обратиться к этим методам, нужно сослаться на объект-окно, который автоматически объявляется в интерфейсном разделе связанного с окном модуля. Главное окно, в свою очередь, тоже должно знать о существовании другого окна. Это достигается ссылкой на модуль окна в предложении Uses. Например, если в ходе выполнения одного из методов главного окна программа захочет вызвать окно с именем fmtest1 (это окно связано с модулем test1), в разделе implementation главного модуля должно быть следующее предложение: