Вид¶

GetFormType() → TFormCreationFlags¶

Возвращает тип окна: fcfModal или fcfMDI.

Return type:: TFormCreationFlags

GetFrameCaption() → String¶

Метод возвращает полный заголовок активной формы(фрейма) - основной заголовок вместе с расширением.

Return type:: String

See also

Заголовок фрейма.

CloseActiveForm(ModalResult: TModalResult)¶

Метод закрывает активную форму. ModalResult имеет смысл, если форма открыта модально. Это значение будет возвращено функцией CreateForm.

Parameters:: ModalResult (TModalResult) – Результат, возвращаемый модальным окном при закрытии.

EnableGUI()¶: Метод снимает блокировку интерфейса, заблокированного ранее методом DisableGUI.

Warning

Не реализовано

DisableGUI()¶

Метод блокирует интерфейс приложения и не позволяет пользователю выполнять какие-либо действия (нажимать кнопки, переходить с записи на запись).

При этом в Global 1.5.x интерфейс приложения затеняется. Затенение работает только на операционных системах Windows 8 и выше. На предыдущих версиях Windows интерфейс не изменяется.

Пример использования¶

<Pascal>
  DisableGUI;
  Try
    {какие-либо действия}
  Finally
    EnableGUI
  End;
</Pascal>

Attention

Обязательно используйте блок try ... finally ... end! В противном случае, если после вызова DisableGUI произойдёт ошибка, EnableGUI может не вызваться, и интерфейс приложения останется заблокированным.

Note

Пары вызовов DisableGUI и EnableGUI могут быть вложенными, при этом блокировка снимется только после последнего вызова EnableGUI.

Warning

Не реализовано

IsCurentFormModal() → Boolean¶

Функция проверяет тип открытия текущей формы. Если форма открыта модально – вернёт True. Если текущая форма открыта MDI-но – вернёт False.

Return type:: Boolean

Пример использования¶

<pascal>
  If IsCurentFormModal then
  Begin
    {какие-либо действия}
  End;
</pascal>