Более точный код для сохранения интерфейса загрузчиков для режима отк…

…люченной модальности #613 #644
xDrivenDevelopment · Sep 8, 2016 · 17ac01f · 17ac01f
1 parent 2fd4c11
commit 17ac01f
Show file tree

Hide file tree

Showing 33 changed files with 495 additions and 453 deletions.
diff --git a/Plugins/ЗагрузчикИзПодсистемКонфигурации.epf b/Plugins/ЗагрузчикИзПодсистемКонфигурации.epf
diff --git a/Plugins/ЗагрузчикКаталога.epf b/Plugins/ЗагрузчикКаталога.epf
diff --git a/Plugins/ЗагрузчикФайла.epf b/Plugins/ЗагрузчикФайла.epf
diff --git a/PluginsTemplates/ШаблонЗагрузчика.epf b/PluginsTemplates/ШаблонЗагрузчика.epf
diff --git a/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/Form/УправляемаяФорма/Форма.bsl b/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/Form/УправляемаяФорма/Форма.bsl
@@ -1,4 +1,6 @@
-НаКлиенте
+&НаКлиенте
+Перем ПостроительДереваТестов;
+&НаКлиенте
 Перем ЗагружаемыйПуть;
 
 &НаКлиенте
@@ -21,9 +23,9 @@
 // { Loader interface
 
 &НаКлиенте
-Функция ВыбратьПутьИнтерактивно(ФормаТестов) Экспорт
+Функция ВыбратьПутьИнтерактивно(КонтекстЯдра, ТекущийПуть = "") Экспорт
 
-	ВыбратьПутьИнтерактивноРаботаСОкном(ФормаТестов);
+	ВыбратьПутьИнтерактивноРаботаСОкном(КонтекстЯдра);
 
 КонецФункции
 
@@ -383,24 +385,24 @@
 // { Вспомогательные методы
 
 &НаКлиенте
-Функция ВыбратьПутьИнтерактивноРаботаСОкном(ФормаТестов) Экспорт 
+Функция ВыбратьПутьИнтерактивноРаботаСОкном(КонтекстЯдра) Экспорт 
 
 	ПараметрыОткрытия = Новый Структура("ОтборПоИмениТеста", "");
 	ИмяФормыВыбораПодсистемыУФ = СтрЗаменить(ЭтаФорма.ИмяФормы, "УправляемаяФорма", "ФормаВыбораПодсистемУФ");
 
 	ОткрытьФорму(ИмяФормыВыбораПодсистемыУФ, 
 		ПараметрыОткрытия, ЭтаФорма,,,, 
-		Новый ОписаниеОповещения("ВыбратьПутьИнтерактивноРаботаСОкномЗавершение", ЭтаФорма, ФормаТестов), 
+		Новый ОписаниеОповещения("ВыбратьПутьИнтерактивноРаботаСОкномЗавершение", ЭтаФорма, КонтекстЯдра), 
 		РежимОткрытияОкнаФормы.БлокироватьВесьИнтерфейс);
 
 КонецФункции
 
 &НаКлиенте
 Процедура ВыбратьПутьИнтерактивноРаботаСОкномЗавершение(Результат, ДополнительныеПараметры) Экспорт
 
-	ФормаТестов = ДополнительныеПараметры;
-	Описание = ОписаниеПлагина(ФормаТестов.Объект.ТипыПлагинов);
-	ФормаТестов.ЗагрузитьТесты(Описание.Идентификатор, Результат, ФормаТестов);
+	КонтекстЯдра = ДополнительныеПараметры;
+	Описание = ОписаниеПлагина(КонтекстЯдра.Объект.ТипыПлагинов);
+	КонтекстЯдра.ЗагрузитьТесты(Описание.Идентификатор, Результат, КонтекстЯдра);
 
 КонецПроцедуры
 

diff --git a/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/Form/ФормаВыбораПодсистемУФ/Форма.bsl b/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/Form/ФормаВыбораПодсистемУФ/Форма.bsl
@@ -1,4 +1,10 @@
-НаКлиенте
+
+&НаСервере
+Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
+	РеквизитФормыВЗначение("Объект").ЗаполнитьДеревоПодсистем(ДеревоПодсистем, Параметры.ОтборПоИмениТеста);
+КонецПроцедуры
+
+&НаКлиенте
 Процедура ПриОткрытии(Отказ)
 	РазвернутьСтрокиДерева(Истина);
 КонецПроцедуры

diff --git a/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/Form/ФормаВыбораПодсистемы/form b/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/Form/ФормаВыбораПодсистемы/form
@@ -601,7 +601,7 @@ A0Qbgk0z0YbgC3miYgVfyBMVK/hCfqTFCqEQJxgjhEKcYIwQCnGKYwQXAACvVTho
 {0}
 }
 }
-},400,292,1,0,1,4,4,364,400,292,96},
+},400,292,1,0,1,4,4,365,400,292,96},
 {
 {5},8,
 {3,

diff --git a/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/ObjectModule.bsl b/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/ObjectModule.bsl
@@ -22,7 +22,7 @@
 
 // { Loader interface
 #Если ТолстыйКлиентОбычноеПриложение Тогда
-Функция ВыбратьПутьИнтерактивно(ТекущийПуть = "") Экспорт
+Функция ВыбратьПутьИнтерактивно(КонтекстЯдра, ТекущийПуть = "") Экспорт
 	ФормаВыбораПодсистем = ЭтотОбъект.ПолучитьФорму("ФормаВыбораПодсистемы");
 	ФормаВыбораПодсистем.РежимВыбора = Истина;
 	ФормаВыбораПодсистем.ОтборПоИмениТеста = "";

diff --git a/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/und/d75f146d-5027-4604-80fd-3b704ddd86a8.0 b/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/und/d75f146d-5027-4604-80fd-3b704ddd86a8.0
@@ -72,9 +72,9 @@
 // { Loader interface
 
 &НаКлиенте
-Функция ВыбратьПутьИнтерактивно(ФормаТестов) Экспорт
+Функция ВыбратьПутьИнтерактивно(КонтекстЯдра, ТекущийПуть = """") Экспорт
 
-	ВыбратьПутьИнтерактивноРаботаСОкном(ФормаТестов);
+	ВыбратьПутьИнтерактивноРаботаСОкном(КонтекстЯдра);
 
 КонецФункции
 
@@ -434,24 +434,24 @@
 // { Вспомогательные методы
 
 &НаКлиенте
-Функция ВыбратьПутьИнтерактивноРаботаСОкном(ФормаТестов) Экспорт 
+Функция ВыбратьПутьИнтерактивноРаботаСОкном(КонтекстЯдра) Экспорт 
 
 	ПараметрыОткрытия = Новый Структура(""ОтборПоИмениТеста"", """");
 	ИмяФормыВыбораПодсистемыУФ = СтрЗаменить(ЭтаФорма.ИмяФормы, ""УправляемаяФорма"", ""ФормаВыбораПодсистемУФ"");
 
 	ОткрытьФорму(ИмяФормыВыбораПодсистемыУФ, 
 		ПараметрыОткрытия, ЭтаФорма,,,, 
-		Новый ОписаниеОповещения(""ВыбратьПутьИнтерактивноРаботаСОкномЗавершение"", ЭтаФорма, ФормаТестов), 
+		Новый ОписаниеОповещения(""ВыбратьПутьИнтерактивноРаботаСОкномЗавершение"", ЭтаФорма, КонтекстЯдра), 
 		РежимОткрытияОкнаФормы.БлокироватьВесьИнтерфейс);
 
 КонецФункции
 
 &НаКлиенте
 Процедура ВыбратьПутьИнтерактивноРаботаСОкномЗавершение(Результат, ДополнительныеПараметры) Экспорт
 
-	ФормаТестов = ДополнительныеПараметры;
-	Описание = ОписаниеПлагина(ФормаТестов.Объект.ТипыПлагинов);
-	ФормаТестов.ЗагрузитьТесты(Описание.Идентификатор, Результат, ФормаТестов);
+	КонтекстЯдра = ДополнительныеПараметры;
+	Описание = ОписаниеПлагина(КонтекстЯдра.Объект.ТипыПлагинов);
+	КонтекстЯдра.ЗагрузитьТесты(Описание.Идентификатор, Результат, КонтекстЯдра);
 
 КонецПроцедуры
 

diff --git a/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/und/versions b/src/Plugins/ЗагрузчикИзПодсистемКонфигурации/und/versions
@@ -1 +1 @@
-{1,15,"",3c157d35-f2b4-4398-a0ab-160cb538d057,"51efd65a-ed36-4be7-a563-89b34ebfa851",fb08872f-97b8-4c15-8c57-a708f5b4fe74,"7074798d-333f-4d35-91d6-154b9f00a019",c199e263-7d52-4889-b273-245ec557bdc5,"7074798d-333f-4d35-91d6-154b9f00a019.0",a7d3dad0-1384-4a8c-8863-09b903282f9a,"7074798d-333f-4d35-91d6-154b9f00a019.1",cee938b5-68b8-422f-9afa-810b9299c036,"c279f76a-3497-488b-ad4e-2ba469b0bd9b",faab93ae-56a1-4210-803a-bbb4c7ca83b1,"c279f76a-3497-488b-ad4e-2ba469b0bd9b.0",1418803a-6926-4759-ac49-0b3e94b15b35,"c279f76a-3497-488b-ad4e-2ba469b0bd9b.1",34b3490d-5b18-4d62-8822-f65cab5af125,"copyinfo",33cecbc7-a528-4021-b5ec-841cdf14a7c7,"d75f146d-5027-4604-80fd-3b704ddd86a8",b8e18293-8281-4d11-9d7a-ff0199c43e2d,"d75f146d-5027-4604-80fd-3b704ddd86a8.0",9b68728d-ce13-4ed0-8985-69626104039f,"dfe532e1-d0ef-4008-afd4-214781ee4960.0",15bc5568-ef27-4899-aa73-33cd6ed066fb,"root",4db2b76c-64f8-42d4-a08e-288938c9b67a,"version",7e21a979-48d2-4683-80dd-777e8776d8bc,"versions",7e6db7b1-d069-46d1-96ce-03cb8ca24b00}
+{1,15,"",440ca21a-121e-4c44-bbf8-d1ed8d44232b,"51efd65a-ed36-4be7-a563-89b34ebfa851",140ae0f4-4798-4e8b-9df4-8b3a5d1a0f44,"7074798d-333f-4d35-91d6-154b9f00a019",dd9eb73d-1f8d-4f81-9216-30f3e80c496c,"7074798d-333f-4d35-91d6-154b9f00a019.0",2df53007-102c-4639-b606-1aeab66bbe26,"7074798d-333f-4d35-91d6-154b9f00a019.1",cee938b5-68b8-422f-9afa-810b9299c036,"c279f76a-3497-488b-ad4e-2ba469b0bd9b",1ca3af84-5b52-4700-8a71-70988a1122ee,"c279f76a-3497-488b-ad4e-2ba469b0bd9b.0",c139292d-9f21-4530-a1ae-083a36981128,"c279f76a-3497-488b-ad4e-2ba469b0bd9b.1",34b3490d-5b18-4d62-8822-f65cab5af125,"copyinfo",a6266900-009c-452c-9ebf-091684d95b1b,"d75f146d-5027-4604-80fd-3b704ddd86a8",0a3f51ea-c2cb-4bb5-abca-a595ecf09e92,"d75f146d-5027-4604-80fd-3b704ddd86a8.0",b9aa150a-c74f-4126-95c5-19914869a039,"dfe532e1-d0ef-4008-afd4-214781ee4960.0",1465faa9-bc48-4e2d-8af8-14465e82314c,"root",ca6d0470-db70-474f-8943-79ba7fc9e57e,"version",67e709a3-52c9-469f-96eb-82b890a24ddf,"versions",524a9731-fbb7-40e1-8f91-f82c1b8827f6}
diff --git a/src/Plugins/ЗагрузчикКаталога/Form/Форма/Форма.bsl b/src/Plugins/ЗагрузчикКаталога/Form/Форма/Форма.bsl
@@ -1,18 +1,25 @@
-НаСервере
+
+// { Plugin interface
+&НаКлиенте
+Функция ОписаниеПлагина(ВозможныеТипыПлагинов) Экспорт
+	Возврат ОписаниеПлагинаНаСервере(ВозможныеТипыПлагинов);
+КонецФункции
+
+&НаСервере
 Функция ОписаниеПлагинаНаСервере(ВозможныеТипыПлагинов)
 	Возврат ЭтотОбъектНаСервере().ОписаниеПлагина(ВозможныеТипыПлагинов);
 КонецФункции
 // } Plugin interface
 
 // { Loader interface
 &НаКлиенте
-Функция ВыбратьПутьИнтерактивно(ФормаТестов, ТекущийПуть = "") Экспорт
+Функция ВыбратьПутьИнтерактивно(КонтекстЯдра, ТекущийПуть = "") Экспорт
 
 	ДиалогВыбораКаталога = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);
 	ДиалогВыбораКаталога.Каталог = ТекущийПуть;
 
 	ДиалогВыбораКаталога.Показать(Новый ОписаниеОповещения("ВыбратьПутьИнтерактивноЗавершение", ЭтаФорма, 
-		Новый Структура("ДиалогВыбораКаталога, ФормаТестов", ДиалогВыбораКаталога, ФормаТестов)));
+		Новый Структура("ДиалогВыбораКаталога, КонтекстЯдра", ДиалогВыбораКаталога, КонтекстЯдра)));
 
 КонецФункции
 
@@ -90,14 +97,14 @@
 Процедура ВыбратьПутьИнтерактивноЗавершение(ВыбранныеФайлы, ДополнительныеПараметры) Экспорт
 
 	ДиалогВыбораКаталога = ДополнительныеПараметры.ДиалогВыбораКаталога;
-	ФормаТестов = ДополнительныеПараметры.ФормаТестов;
+	КонтекстЯдра = ДополнительныеПараметры.КонтекстЯдра;
 
 	Если (ВыбранныеФайлы <> Неопределено) Тогда
 		Результат = ДиалогВыбораКаталога.Каталог;
 	КонецЕсли;
 
-	Описание = ОписаниеПлагина(ФормаТестов.Объект.ТипыПлагинов);
-	ФормаТестов.ЗагрузитьТесты(Описание.Идентификатор, Результат, ФормаТестов);
+	Описание = ОписаниеПлагина(КонтекстЯдра.Объект.ТипыПлагинов);
+	КонтекстЯдра.ЗагрузитьТесты(Описание.Идентификатор, Результат);
 
 КонецПроцедуры
 // } Вспомогательные методы
diff --git a/src/Plugins/ЗагрузчикКаталога/ObjectModule.bsl b/src/Plugins/ЗагрузчикКаталога/ObjectModule.bsl
@@ -14,7 +14,7 @@
 
 // { Loader interface
 #Если ТолстыйКлиентОбычноеПриложение Тогда
-Функция ВыбратьПутьИнтерактивно(ТекущийПуть = "") Экспорт
+Функция ВыбратьПутьИнтерактивно(КонтекстЯдра, ТекущийПуть = "") Экспорт
 	ДиалогВыбораКаталога = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);
 	ДиалогВыбораКаталога.Каталог = ТекущийПуть;
 

diff --git a/src/Plugins/ЗагрузчикКаталога/und/b5f25876-92c4-4d3f-ac5d-d5ee489cf5d4.0 b/src/Plugins/ЗагрузчикКаталога/und/b5f25876-92c4-4d3f-ac5d-d5ee489cf5d4.0
@@ -62,13 +62,13 @@
 
 // { Loader interface
 &НаКлиенте
-Функция ВыбратьПутьИнтерактивно(ФормаТестов, ТекущийПуть = """") Экспорт
+Функция ВыбратьПутьИнтерактивно(КонтекстЯдра, ТекущийПуть = """") Экспорт
 
 	ДиалогВыбораКаталога = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);
 	ДиалогВыбораКаталога.Каталог = ТекущийПуть;
 
 	ДиалогВыбораКаталога.Показать(Новый ОписаниеОповещения(""ВыбратьПутьИнтерактивноЗавершение"", ЭтаФорма, 
-		Новый Структура(""ДиалогВыбораКаталога, ФормаТестов"", ДиалогВыбораКаталога, ФормаТестов)));
+		Новый Структура(""ДиалогВыбораКаталога, КонтекстЯдра"", ДиалогВыбораКаталога, КонтекстЯдра)));
 
 КонецФункции
 
@@ -146,14 +146,14 @@
 Процедура ВыбратьПутьИнтерактивноЗавершение(ВыбранныеФайлы, ДополнительныеПараметры) Экспорт
 
 	ДиалогВыбораКаталога = ДополнительныеПараметры.ДиалогВыбораКаталога;
-	ФормаТестов = ДополнительныеПараметры.ФормаТестов;
+	КонтекстЯдра = ДополнительныеПараметры.КонтекстЯдра;
 
 	Если (ВыбранныеФайлы <> Неопределено) Тогда
 		Результат = ДиалогВыбораКаталога.Каталог;
 	КонецЕсли;
 
-	Описание = ОписаниеПлагина(ФормаТестов.Объект.ТипыПлагинов);
-	ФормаТестов.ЗагрузитьТесты(Описание.Идентификатор, Результат, ФормаТестов);
+	Описание = ОписаниеПлагина(КонтекстЯдра.Объект.ТипыПлагинов);
+	КонтекстЯдра.ЗагрузитьТесты(Описание.Идентификатор, Результат);
 
 КонецПроцедуры
 // } Вспомогательные методы",

diff --git a/src/Plugins/ЗагрузчикКаталога/und/versions b/src/Plugins/ЗагрузчикКаталога/und/versions
@@ -1 +1 @@
-{1,9,"",86e9f739-00df-41ff-80e1-39e3677d23cf,"47df0590-78c7-4bb0-bf65-a5c6ef41a8d7.0",3f5e0575-79e6-4a48-ae14-4790b3824efd,"b5f25876-92c4-4d3f-ac5d-d5ee489cf5d4",4a1a5bae-67b1-4f39-a11d-92cc6dadda93,"b5f25876-92c4-4d3f-ac5d-d5ee489cf5d4.0",46f9eec2-0c14-434f-bfd5-4fb5e277b4f1,"copyinfo",ef2921f3-164f-4553-b153-36d72a5657bf,"d8b3f25c-4b0c-4bad-8a2e-f7cf4018a448",bb6748d4-7022-4f9f-a24f-538ef664998e,"root",aabca303-742a-4da9-9590-8bd2d2d84ae7,"version",b0c77174-661b-476e-b3e8-c7606a9f6eb9,"versions",fd28c850-4502-431d-928b-b112eb27d2bc}
+{1,9,"",30f88be5-b7d6-4f16-9bbf-54aa831da296,"47df0590-78c7-4bb0-bf65-a5c6ef41a8d7.0",0d6b4738-4f50-4922-b033-bc63f2bca2e0,"b5f25876-92c4-4d3f-ac5d-d5ee489cf5d4",3355ebcb-c5bd-4d69-851f-481ac9cc06f6,"b5f25876-92c4-4d3f-ac5d-d5ee489cf5d4.0",d915ebf9-c96e-46f6-beec-8fa4efac3b6f,"copyinfo",b5b836e8-7cf9-4183-a70e-6a76d178b7c7,"d8b3f25c-4b0c-4bad-8a2e-f7cf4018a448",38068b5b-bc29-462b-8e9a-be9fb3a513de,"root",ce0c49c9-8e78-48c3-8d29-4f7b8f55e781,"version",e7848511-4287-430f-9049-4d4561d4e9b5,"versions",8da29574-c72b-4a76-9b75-2d8ab0a87358}
diff --git a/src/Plugins/ЗагрузчикФайла/Form/Форма/Форма.bsl b/src/Plugins/ЗагрузчикФайла/Form/Форма/Форма.bsl
@@ -1,4 +1,6 @@
-НаКлиенте
+&НаКлиенте
+Перем КэшПостроительДереваТестов;
+&НаКлиенте
 Перем ЗагружаемыйПуть;
 
 &НаКлиенте
@@ -24,7 +26,7 @@
 
 // { Loader interface
 &НаКлиенте
-Функция ВыбратьПутьИнтерактивно(ФормаТестов, ТекущийПуть = "") Экспорт
+Функция ВыбратьПутьИнтерактивно(КонтекстЯдра, ТекущийПуть = "") Экспорт
 
 	ДиалогВыбораТеста = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
 	ДиалогВыбораТеста.Фильтр = "Обработка-тест (*.epf)|*.epf|Отчет-тест (*.erf)|*.erf|Все файлы|*";
@@ -34,7 +36,7 @@
 
 	Результат = Новый ТекстовыйДокумент;
 	ДиалогВыбораТеста.Показать(Новый ОписаниеОповещения("ВыбратьПутьИнтерактивноЗавершение", ЭтаФорма, 
-		Новый Структура("ДиалогВыбораТеста, Результат, ФормаТестов", ДиалогВыбораТеста, Результат, ФормаТестов)));
+		Новый Структура("ДиалогВыбораТеста, Результат, КонтекстЯдра", ДиалогВыбораТеста, Результат, КонтекстЯдра)));
 
 КонецФункции
 
@@ -373,7 +375,7 @@
 
 	ДиалогВыбораТеста = ДополнительныеПараметры.ДиалогВыбораТеста;
 	Результат = ДополнительныеПараметры.Результат;
-	ФормаТестов = ДополнительныеПараметры.ФормаТестов;
+	КонтекстЯдра = ДополнительныеПараметры.КонтекстЯдра;
 
 	Если (ВыбранныеФайлы <> Неопределено) Тогда
 		Для каждого ПолноеИмяФайла Из ДиалогВыбораТеста.ВыбранныеФайлы Цикл
@@ -384,8 +386,8 @@
 
 	Текст = Лев(Текст, СтрДлина(Текст) - 1);
 
-	Описание = ОписаниеПлагина(ФормаТестов.Объект.ТипыПлагинов);
-	ФормаТестов.ЗагрузитьТесты(Описание.Идентификатор, Текст, ФормаТестов);
+	Описание = ОписаниеПлагина(КонтекстЯдра.Объект.ТипыПлагинов);
+	КонтекстЯдра.ЗагрузитьТесты(Описание.Идентификатор, Текст);
 
 КонецПроцедуры
 // } Вспомогательные методы
diff --git a/src/Plugins/ЗагрузчикФайла/ObjectModule.bsl b/src/Plugins/ЗагрузчикФайла/ObjectModule.bsl
@@ -21,7 +21,7 @@
 
 // { Loader interface
 #Если ТолстыйКлиентОбычноеПриложение Тогда
-Функция ВыбратьПутьИнтерактивно(ТекущийПуть = "") Экспорт
+Функция ВыбратьПутьИнтерактивно(КонтекстЯдра, ТекущийПуть = "") Экспорт
 	ДиалогВыбораТеста = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
 	ДиалогВыбораТеста.Фильтр = "Обработка-тест (*.epf)|*.epf|Отчет-тест (*.erf)|*.erf|Все файлы|*";
 	ДиалогВыбораТеста.МножественныйВыбор = Истина;