Создание формы во время вычислений

Создание, открытие и закрытие дополнительных форм.

Form 1: T Form 1;

Application. Create form (класс, переменная).

Project + Options стр.Forms

1) Если нужно было сэкономить память.

2) Если нужно несколько экземпляров одного класса.

Form 11: T Form;

Form 11: =T Form 1. Create (Application)®владелец создаваемой формы.

® идентификатор экземпляра формы.

Если Visible – true, то при создании форма тут же показывается на экране, если – false, то для открытия формы необходимо выполнить один из методов:

Procedure:Show; - показ немодального окна.

Function: Show Modal: Integer – окно как модальное.

Form 11. Show;

Form 11. Close;

Модальное окно активно до тех пор, пока его не закроют.

Лекция №9.

Обычно диалоговое окно используется для ввода каких – либо параметров и является модальным (если приложение имеет несколько окон, и открывают

модальное окно, то другие окна не могут использоваться, пока не закрыто модальное окно).

Для обработки модальных окон существуют стандартные средства.

Для активизации и показа окна существует следующий метод:

Procedure. Show;

Function Show Modal: Integer;

(для использования окна как модального, это не процедура, а функция, возвращающая целочисленное значение).

mr OK

mr Cancel ® возвращаемые значения.

If My Dialog. Show Modal = mr OK

Then …

…………

else…

…………

Форма имеет такое свойство:

Modal Result: Integer;

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

Существуют константы, относящиеся к этому свойству:

Mr Abort

Mr Retry

Mr Ignore

Mr Yes

Mr No

Mr None

Для OK:

My Dialog Modal Result: = mr OK

Если в диалоговом окне необходимо проверить корректность введенных данных, то это следует делать в обработчике кнопки OK.

Если данные некорректны, то свойству Modal Result надо ввести значение:

Mr None.

Значение кнопки Modal Result автоматически переносится в одноименное свойство формы при нажатии этой кнопки.

Лекция № 10.