Только чтение.
Тип: Форма (Form).
Возвращает текущую активную форму для этого приложения.
АктивнаяФорма = Форма1.АктивнаяФорма;
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма2 = Ф.Форма(); Форма2.Текст = "Вторая форма"; Форма2.Ширина = 300; Форма2.Высота = 100; Форма2.Отображать = Истина; Форма2.Показать(); Форма2.Активизировать(); АктивнаяФорма = Форма1.АктивнаяФорма; Сообщить("" + АктивнаяФорма.Текст); Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма2 = Ф.Форма(); Форма2.Текст = "Вторая форма"; Форма2.Ширина = 300; Форма2.Высота = 100; Форма2.Отображать = Истина; Форма2.Показать(); Форма2.Активизировать(); АктивнаяФорма = Форма1.АктивнаяФорма; Если Ф.ПлатформаWin Тогда Сообщить(?( АктивнаяФорма.Текст = "Вторая форма" , "", "!!! ") + "Форма.АктивнаяФорма (Form.ActiveForm) Свойство" + " " + ТекущаяДата()); Иначе Сообщить(?( Истина , "", "!!! ") + "Форма.АктивнаяФорма (Form.ActiveForm) Свойство" + " " + ТекущаяДата()); КонецЕсли;