КнопкаПанелиИнструментовАрг.Кнопка (ToolBarButtonClickEventArgs.Button) Свойство

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

Перем Ф;

Процедура ПанельИнструментов1_ПриНажатииКнопки() Экспорт
	Аргументы1 = Ф.КнопкаПанелиИнструментовАрг();
	Сообщить("Аргументы1.Кнопка = " + Аргументы1.Кнопка.Текст);
КонецПроцедуры

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

ПанельИнструментов1 = Форма1.ЭлементыУправления.Добавить(Ф.ПанельИнструментов());
КнопкаПанелиИнструментов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 = Ф.КнопкаПанелиИнструментов("Кнопка1");
КнопкаПанелиИнструментов1 = ПанельИнструментов1.Кнопки.Добавить(Кнопка1);
ПанельИнструментов1.ПриНажатииКнопки = Ф.Действие(ЭтотОбъект, "ПанельИнструментов1_ПриНажатииКнопки");

Словарь1 = Ф.Словарь();
Словарь1.Добавить("Кнопка", КнопкаПанелиИнструментов1);
Ф.ВызватьСобытие(ПанельИнструментов1, "ПриНажатииКнопки", Словарь1);

Сообщить(?(Аргументы1.Кнопка.Текст = "Кнопка1", "", "!!! ") + "КнопкаПанелиИнструментовАрг.Кнопка (ToolBarButtonClickEventArgs.Button) Свойство" + " " + ТекущаяДата());