Диалог.Показать (Dialog.Show) Метод

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

Перем Диалог1;

Процедура Кнопка1_Нажатие() Экспорт
	Диалог1.Показать();
КонецПроцедуры

Процедура Кнопка2_Нажатие() Экспорт
	Диалог1.Закрыть();
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\DeclarativeForms\DeclarativeForms\bin\Debug\DeclarativeForms.dll");
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Заголовок = "Нажмите кнопку";
Форма1.НачальнаяШирина = 300;
Форма1.НачальнаяВысота = 200;

Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Нажми";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");

Диалог1 = ДФ.Диалог();
Диалог1.Родитель = Форма1;
Диалог1.Стиль.ЦветФона = ДФ.Цвет("Бежевый");

Абзац1 = ДФ.Абзац();
Абзац1.Родитель = Диалог1;
Абзац1.Текст = "Диалог";

Кнопка2 = ДФ.Кнопка();
Кнопка2.Родитель = Диалог1;
Кнопка2.Текст = "Закрыть";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");

Форма1.Открыть();