IMDICloseEventArgs.Allow

Синтаксис

Allow: Boolean;

Описание

Свойство Allow определяет возможность закрытия дочерней MDI-формы.

По умолчанию свойству установлено значение True, при этом форма будет закрыта. Если свойству установить значение False, то закрытие дочерней MDI-формы будет отменено.

Пример

Для выполнения примера предполагается наличие формы. Данная форма является родительской MDI-формой, содержащей несколько дочерних. При работе у дочерних MDI-форм изменяется значение свойства Tag.

Sub FormOnMDIClose(Sender: Object; Args: IMDICloseEventArgs);

Begin

If Args.MDIChild.Tag = 100 Then

Args.Allow := False;

End If;

End Sub FormOnMDIClose;

После выполнения примера при попытке закрыть дочернюю MDI-форму, если ее свойство Tag равно "100", то закрытие данной формы будет отменено.

См. также:

IMDICloseEventArgs