Главное окно

Экранный элемент <окно> предназначен для описания дополнительных окон в интерфейсе. Все видимые элементы, описанные вне секции <окно>, вставляются в главное окно интерфейса.

<окно> ::= window <имя> [<заголовок>]
  <атрибуты окна>
  <координаты>
  {<таблица> | <экран> | <панель> | <обработчик событий>}
  end [;]

<окно> открывается процедурой RunWindow либо RunWindowModal. RunWindowModal всегда запускает окно в модальном режиме, RunWindow - только если текущее окно уже запущено в модальном режиме. В случае если окно запускается не в модальном режиме, в момент вызова окно только вставляется в DeskTop. Поэтому в немодальном случае программа

RunWindow(TestWin);
Message('Hello,Window!');

будет выполняться следующим образом: сначала на экране появится окно, потом на его фоне появиться диалоговое окно с сообщением 'Hello, Window!'.

В случае модального запуска окна программа

RunWindowModal(TestWin);
Message('Это сообщение появится после закрытия окна');

вначале откроет окно и только после его закрытия высветит сообщение. То же самое будет при использовании функции RunWindow из модально запущенного интерфейса.

Обработчик событий окна получает на вход события от кнопок и статус-линии в случае, если окно является в данный момент активным.

Пример.

window exampleW;
  screen exampleScreen;
   fields
	name;
	code;
<<
.@@@@@@@@@@@@@@@
.@@@@@@@@@@@@@@@
>>
  end;
end;
handleEvent
  cmOpenWindow: RunWindow(exampleW);
end;