Действие.ИмяМетода (Action.MethodName) Свойство

Копировать     Выделить всё

Функция Форма1_Нажатие() Экспорт
	Сообщить("Форма1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецФункции

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Текст = "Кликните по форме";
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Действие = Ф.Действие(ЭтотОбъект, "");
Действие.ИмяМетода = "Форма1_Нажатие";
Форма1.Нажатие = Действие;
	
Ф.ЗапуститьОбработкуСобытий();

Копировать     Выделить всё

Функция Форма1_Нажатие() Экспорт
	Сообщить("Форма1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецФункции

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Действие = Ф.Действие(ЭтотОбъект, "");
Действие.ИмяМетода = "Форма1_Нажатие";
Форма1.Нажатие = Действие;
	
Сообщить(?(
Действие.ИмяМетода = "Форма1_Нажатие"
, "", "!!! ") + "Действие.ИмяМетода (Action.MethodName) Свойство" + " " + ТекущаяДата());