ShowDialog([Parent: IWin32Window = Null]): Integer;
Parent - родительское окно, относительного которого .NET-форма будет открыта модально. По умолчанию передается значение Null, при этом .NET-форма будет открыта модально относительно текущей формы.
Метод ShowDialog отображает окно текущей .NET-формы модально относительно указанного окна и возвращает результат выполнения формы.
Для выполнения примера предполагается наличие формы и расположенной на ней кнопки с наименованием «Button1». В репозитории имеется .NET-сборка с идентификатором «TestAssm». В данной сборке создана .NET-форма с наименованием «TestForm». Пространство имен сборки соответствует ее идентификатору.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
MB: IMetabase;
Run: IForeNETRuntime;
Asm: IForeNETRuntimeAssembly;
RuntimeForm: IForeNETRuntimeForm;
FormResult: Integer;
Begin
MB := MetabaseClass.Active;
Run := ForeNETAssemblyClass.Runtime;
Asm := Run.Assembly(MB.ItemById("TestAssm").Bind As IForeNETAssembly);
RuntimeForm := Asm.Form("TestAssm.TestForm");
FormResult := RuntimeForm.ShowDialog;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку из .NET-сборки будет открыта .NET-форма. .NET-форма будет открыта модально относительно текущей формы. Результат закрытия модальной формы будет содержаться в переменной «FormResult».
См. также: