Диалог.ДобавитьКнопку (Dialog.AddButton) Метод

Копировать

Перем ТФ, Окно1, Диалог1, Диалог;

Процедура ПриОткрытии() Экспорт
	Диалог = Диалог1;
	Окно1.Текст = "Пример диалогового окна";
КонецПроцедуры

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

Окно1 = ТФ.Окно();
Окно1.Заголовок = "Окно1";
Окно1.Заполнить();
ЦветоваяСхема1 = ТФ.ЦветоваяСхема();
ЦветоваяСхема1.Нормальный = ТФ.Атрибут(ТФ.Цвет.ЯркоГолубой, ТФ.Цвет.Синий);
ЦветоваяСхема1.Фокус = ТФ.Атрибут(ТФ.Цвет.ЯркоГолубой, ТФ.Цвет.Синий);
Окно1.ЦветоваяСхема = ЦветоваяСхема1;
ТФ.Верхний.Добавить(Окно1);

Диалог1 = ТФ.Диалог();
Диалог1.Заголовок = "Диалог1";
Кнопка1 = ТФ.Кнопка("Кнопка1");
Кнопка2 = ТФ.Кнопка("Кнопка2");
Диалог1.ДобавитьКнопку(Кнопка1);
Диалог1.ДобавитьКнопку(Кнопка2);
Диалог1.ВыравниваниеКнопок = ТФ.ВыравниваниеКнопок.Право;

Окно1.Добавить(Диалог1);

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.Запуск();

Копировать

Перем ТФ, Окно1, Диалог1, Диалог;

Процедура ПриОткрытии() Экспорт
	Диалог = Диалог1;
	Окно1.Текст = "Пример диалогового окна";
КонецПроцедуры

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

Окно1 = ТФ.Окно();
Окно1.Заголовок = "Окно1";
Окно1.Заполнить();
ЦветоваяСхема1 = ТФ.ЦветоваяСхема();
ЦветоваяСхема1.Нормальный = ТФ.Атрибут(ТФ.Цвет.ЯркоГолубой, ТФ.Цвет.Синий);
ЦветоваяСхема1.Фокус = ТФ.Атрибут(ТФ.Цвет.ЯркоГолубой, ТФ.Цвет.Синий);
Окно1.ЦветоваяСхема = ЦветоваяСхема1;
ТФ.Верхний.Добавить(Окно1);

Диалог1 = ТФ.Диалог();
Диалог1.Заголовок = "Диалог1";
Кнопка1 = ТФ.Кнопка("Кнопка1");
Кнопка2 = ТФ.Кнопка("Кнопка2");
Диалог1.ДобавитьКнопку(Кнопка1);
Диалог1.ДобавитьКнопку(Кнопка2);
Диалог1.ВыравниваниеКнопок = ТФ.ВыравниваниеКнопок.Право;

Окно1.Добавить(Диалог1);

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");
ТФ.ЗапуститьИЗавершить();

Сообщить(?(
ТипЗнч(Диалог) = Тип("ТфДиалог")
, "", "!!! ") + "Диалог.ДобавитьКнопку (Dialog.AddButton) Метод" + " " + ТекущаяДата() + Символы.ПС);