Свойство Mode определяет, каким образом произошло подключение к репозиторию.
Подключение к репозиторию может происходить c клиентского места из настольного приложения «Форсайт. Аналитическая платформа» или из веб-приложения.
Для выполнения примера на Fore предполагается наличие формы, содержащей компонент Button с идентификатором «Button1». Пример является обработчиком события OnClick для компонента «Button1».
Для выполнения примера на Fore.NET предполагается наличие формы, содержащей компонент Button с идентификатором «button1». Пример является обработчиком события Click для компонента «button1».
Добавьте ссылки на системные сборки: ForeSystem, Metabase, Ui.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
MB: IMetabase;
Begin
MB := MetabaseClass.Active;
If MB.Mode = ApplicationMode.Web Then
WinApplication.InformationBox("Данная функция не доступна при использовании веб-приложения.");
Else
WinApplication.InformationBox("Данная функция доступна при подключении к репозиторию c клиентского места
из настольного приложения «Форсайт. Аналитическая платформа».");
End If;
End Sub Button1OnClick;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
MB: IMetabase;
WinApp: WinApplicationClassClass = New WinApplicationClassClass();
Begin
MB := Self.Metabase;
If MB.Mode = ApplicationMode.amWeb Then
WinApp.InformationBox("Данная функция не доступна при использовании веб-приложения.", New IWin32WindowForeAdapter(Self));
Else
WinApp.InformationBox("Данная функция доступна при подключении к репозиторию c клиентского места
из настольного приложения «Форсайт. Аналитическая платформа».", New IWin32WindowForeAdapter(Self));
End If;
End Sub;
В результате выполнения примера на экране появится сообщение:
«Данная функция не доступна при использовании веб-приложения», если соединение с репозиторием произошло из веб-приложения;
«Данная функция доступна при подключении к репозиторию с клиентского места из настольного приложения «Форсайт. Аналитическая платформа»», если соединение с репозиторием произошло с клиентского места из настольного приложения «Форсайт. Аналитическая платформа».
См. также: