You've already forked SmartConfigurator
mirror of
https://github.com/ret-Phoenix/SmartConfigurator.git
synced 2026-06-16 00:57:28 +02:00
Serg Ushakov
117 lines
5.1 KiB
Plaintext
117 lines
5.1 KiB
Plaintext
#Использовать asserts
|
|
#Использовать gui
|
|
|
|
Перем ВидыПоляФормы;
|
|
Перем Форма;
|
|
Перем ТекстПроверки;
|
|
Перем Данные;
|
|
|
|
Процедура Инициализация()
|
|
|
|
Данные = Новый Соответствие;
|
|
Данные.Вставить("Один", "1");
|
|
Данные.Вставить("Два", "2");
|
|
Данные.Вставить("Три", "3");
|
|
|
|
КонецПроцедуры
|
|
|
|
Функция ПолучитьСписокТестов(Тестирование) Экспорт
|
|
|
|
СписокТестов = Новый Массив;
|
|
СписокТестов.Добавить("Тест_Должен_СоздатьПоле");
|
|
СписокТестов.Добавить("Тест_Должен_ПровестиРаботуСоЗначением");
|
|
СписокТестов.Добавить("Тест_Должен_УстановитьИПроверитьДействиеПриИзмении");
|
|
СписокТестов.Добавить("Тест_Должен_ПолучитьДействие");
|
|
|
|
Возврат СписокТестов;
|
|
|
|
КонецФункции
|
|
|
|
//# Работа с событиями
|
|
Процедура ПриОткрытииФормы() Экспорт
|
|
Форма.Закрыть();
|
|
КонецПроцедуры
|
|
|
|
Функция ПолучитьФорму()
|
|
|
|
УправляемыйИнтерфейс = Новый УправляемыйИнтерфейс();
|
|
Форма = УправляемыйИнтерфейс.СоздатьФорму();
|
|
Форма.УстановитьДействие(ЭтотОбъект, "ПриОткрытии", "ПриОткрытииФормы");
|
|
ВидыПоляФормы = Форма.ВидПоляФормы;
|
|
|
|
КонецФункции
|
|
|
|
|
|
Процедура Тест_Должен_СоздатьПоле() Экспорт
|
|
|
|
ПолучитьФорму();
|
|
|
|
Поле1 = Форма.Элементы.Добавить("Поле1", "ПолеФормы", Неопределено);
|
|
Поле1.Вид = ВидыПоляФормы.ПолеСоСписком;
|
|
|
|
Ожидаем.Что(Форма.Элементы.Найти("Поле1")).Существует();
|
|
|
|
Форма.Показать();
|
|
|
|
КонецПроцедуры
|
|
|
|
Процедура Тест_Должен_ПровестиРаботуСоЗначением() Экспорт
|
|
|
|
ПолучитьФорму();
|
|
|
|
НовоеЗначение = "3";
|
|
|
|
Поле1 = Форма.Элементы.Добавить("Поле1", "ПолеФормы", Неопределено);
|
|
Поле1.Вид = ВидыПоляФормы.ПолеСоСписком;
|
|
Поле1.СписокВыбора = Данные;
|
|
Поле1.Значение = НовоеЗначение;
|
|
|
|
Форма.Показать();
|
|
|
|
Стр1 = Форма.Элементы.Найти("Поле1").Значение;
|
|
//Сообщить("Нашли и значение: " + Стр1);
|
|
|
|
Ожидаем.Что(Форма.Элементы.Найти("Поле1").Значение).Равно(НовоеЗначение);
|
|
|
|
КонецПроцедуры
|
|
|
|
//# Работа с событиями
|
|
Процедура ПриИзменииЗначения() Экспорт
|
|
ТекстПроверки = "Новое значение: ";
|
|
КонецПроцедуры
|
|
|
|
Процедура Тест_Должен_УстановитьИПроверитьДействиеПриИзмении() Экспорт
|
|
ПолучитьФорму();
|
|
|
|
НовоеЗначение = "3";
|
|
|
|
ТекстПроверки = "Событие не отработало: ПриИзменииЗначения: ";
|
|
Поле1 = Форма.Элементы.Добавить("Поле1", "ПолеФормы", Неопределено);
|
|
Поле1.Вид = ВидыПоляФормы.ПолеСоСписком;
|
|
Поле1.СписокВыбора = Данные;
|
|
Поле1.УстановитьДействие(ЭтотОбъект, "ПриИзменении", "ПриИзменииЗначения");
|
|
Поле1.Значение = НовоеЗначение;
|
|
Форма.Показать();
|
|
|
|
Ожидаем.Что(ТекстПроверки + Форма.Элементы.Найти("Поле1").Значение).Равно("Новое значение: " + НовоеЗначение);
|
|
|
|
КонецПроцедуры
|
|
|
|
Процедура Тест_Должен_ПолучитьДействие() Экспорт
|
|
ПолучитьФорму();
|
|
|
|
Поле1 = Форма.Элементы.Добавить("Поле1", "ПолеФормы", Неопределено);
|
|
Поле1.Вид = ВидыПоляФормы.ПолеСоСписком;
|
|
Поле1.УстановитьДействие(ЭтотОбъект, "ПриИзменении", "ПриИзменииЗначения");
|
|
|
|
Ожидаем.Что(Форма.Элементы.Найти("Поле1").ПолучитьДействие("ПриИзменении")).ЭтоНе().Равно("");
|
|
|
|
Форма.Показать();
|
|
|
|
КонецПроцедуры
|
|
|
|
//////////////////////////////////////////////////////////////////////////////////////
|
|
// Инициализация
|
|
|
|
Инициализация();
|