DialogResult Property

Использование

Чтение и запись.

Значение

Возвращает или задает результат диалога для формы.

Примечание

Пример

Сообщить("Форма2.РезультатДиалога = " + Форма2.РезультатДиалога);

Полный пример кода

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

Перем Ф, Форма2;

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

Процедура Кнопка2_Нажатие() Экспорт
	Сообщить("Форма2.РезультатДиалога = " + Форма2.РезультатДиалога);
КонецПроцедуры

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

Форма2 = Ф.Форма();
Форма2.Текст = "Диалоговая форма";
Форма2.Ширина = 300;
Форма2.Высота = 100;

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

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

Форма2.ПоказатьДиалог();

Ф.ЗапуститьОбработкуСобытий();

Тестовый код

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

Перем Ф, Форма2;

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

Процедура Кнопка2_Нажатие() Экспорт
	Сообщить("Форма2.РезультатДиалога = " + Форма2.РезультатДиалога);
КонецПроцедуры

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

Форма2 = Ф.Форма();
Форма2.Текст = "Диалоговая форма";
Форма2.Ширина = 300;
Форма2.Высота = 100;

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

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

// Форма2.ПоказатьДиалог();

Сообщить(?(
Истина
, "", "!!! ") + "Форма.РезультатДиалога (Form.DialogResult) Свойство" + " " + ТекущаяДата());

Форма.РезультатДиалога (Form.DialogResult) Свойство

Использование

Значение

Примечание

Пример

Смотрите также