-
Notifications
You must be signed in to change notification settings - Fork 108
/
Copy pathaddin.os
52 lines (30 loc) · 2.33 KB
/
addin.os
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
#Использовать "component"
Перем юТест;
Функция ПолучитьСписокТестов(Знач Тесты) Экспорт
юТест = Тесты;
Список = Новый Массив;
Список.Добавить("ТестДолжен_ПроверитьПодключениеГлобальногоКонтекста");
Возврат Список;
КонецФункции
Функция ВернутьПеречисление(Значение)
Возврат Значение;
КонецФункции
Процедура ТестДолжен_ПроверитьПодключениеГлобальногоКонтекста() Экспорт
Коллекция1 = Новый ПростоКоллекция; // Объект создаётся
Объект1 = Новый ПростоКласс;
Объект2 = Новый ПростоКласс(4); // Разные конструкторы
юТест.ПроверитьНеРавенство(Объект1.ЦелочисленноеСвойство, Объект2.ЦелочисленноеСвойство);
юТест.ПроверитьРавенство(Объект2.ЦелочисленноеСвойство, 4);
Коллекция1.Добавить(Объект1);
юТест.ПроверитьРавенство(Коллекция1.Количество(), 1);
// Обход по коллекции
Для Каждого мОбъект Из Коллекция1 Цикл
юТест.ПроверитьРавенство(мОбъект, Объект1);
КонецЦикла;
// Перечисление в глобальном контексте
Объект1.СвойствоПеречисление = ПростоПеречисление.Элемент1;
юТест.ПроверитьРавенство(Объект1.СвойствоПеречисление, ПростоПеречисление.Элемент1);
юТест.ПроверитьНеРавенство(Объект1.СвойствоПеречисление, ПростоПеречисление.Элемент2);
// Работа маршаллера
юТест.ПроверитьРавенство(ВернутьПеречисление(Объект1.СвойствоПеречисление), ПростоПеречисление.Элемент1);
КонецПроцедуры