Merge pull request #17 from realMaxA/develop

#16 Добавлен новый режим

Author: EvilBeaver

src/Классы/КомандаСоздатьДистрибутив.os

@@ -16,6 +16,7 @@
  Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "-out", "Выходной каталог");
  Парсер.ДобавитьПараметрФлагКоманды(ОписаниеКоманды, "-setup", "Собирать дистрибутив вида setup.exe");
  Парсер.ДобавитьПараметрФлагКоманды(ОписаниеКоманды, "-files", "Собирать дистрибутив вида 'файлы поставки'");
+ Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "-option", "Вариант поставки");
 Парсер.ДобавитьПараметрКоллекцияКоманды(ОписаниеКоманды, "-prop-files", "Файлы с переменными сборки (дополнительные)");
  Парсер.ДобавитьКоманду(ОписаниеКоманды);
 
@@ -40,10 +41,10 @@
 
 КонецФункции
 
-Процедура ВыполнитьСборку(Знач УправлениеКонфигуратором, Знач ФайлМанифеста, Знач СобиратьИнсталлятор, Знач СобиратьФайлыПоставки, Знач ВыходнойКаталог, Знач ФайлыСвойств) Экспорт
+Процедура ВыполнитьСборку(Знач УправлениеКонфигуратором, Знач ФайлМанифеста, Знач СобиратьИнсталлятор, Знач СобиратьФайлыПоставки, Знач ВариантПоставки, Знач ВыходнойКаталог, Знач ФайлыСвойств) Экспорт
 
  Информация = СобратьИнформациюОКонфигурации(УправлениеКонфигуратором, ФайлыСвойств);
- СоздатьДистрибутивПоМанифесту(УправлениеКонфигуратором, ФайлМанифеста, Информация, СобиратьИнсталлятор, СобиратьФайлыПоставки, ВыходнойКаталог);
+ СоздатьДистрибутивПоМанифесту(УправлениеКонфигуратором, ФайлМанифеста, Информация, СобиратьИнсталлятор, СобиратьФайлыПоставки, ВариантПоставки, ВыходнойКаталог);
 
 КонецПроцедуры
 
@@ -135,6 +136,7 @@
  Знач ИнформацияОМетаданных,
  Знач СобиратьИнсталлятор,
  Знач СобиратьФайлыПоставки,
+ Знач ВариантПоставки,
  Знач ВыходнойКаталог)
 
 ИмяКаталогаШаблонаВерсии = ОкружениеСборки.ОпределитьСтандартноеИмяКаталогаШаблона(ИнформацияОМетаданных);
@@ -143,6 +145,7 @@
  Сборщик.ФайлМанифеста = ФайлМанифеста;
  Сборщик.СоздаватьИнсталлятор = СобиратьИнсталлятор;
  Сборщик.СоздаватьФайлыПоставки = СобиратьФайлыПоставки;
+ Сборщик.ВариантПоставки = ВариантПоставки;
  Сборщик.ВыходнойКаталог = ВыходнойКаталог; 
 
  Сборщик.Собрать(УправлениеКонфигуратором, ИнформацияОМетаданных.Версия, ИмяКаталогаШаблонаВерсии);
@@ -162,6 +165,7 @@
  Результат.Вставить("ФайлМанифеста", ПараметрыКоманды["ФайлМанифеста"]);
  Результат.Вставить("СобиратьИнсталлятор", ПараметрыКоманды["-setup"]);
  Результат.Вставить("СобиратьФайлыПоставки", ПараметрыКоманды["-files"]);
+ Результат.Вставить("ВариантПоставки", ПараметрыКоманды["-option"]);
  Результат.Вставить("ВыходнойКаталог", ПараметрыКоманды["-out"]);
 Результат.Вставить("ФайлыСвойств", ПараметрыКоманды["-prop-files"]);
 

src/Классы/СборщикДистрибутива.os

@@ -2,6 +2,7 @@
 Перем ФайлМанифеста Экспорт;
 Перем СоздаватьИнсталлятор Экспорт;
 Перем СоздаватьФайлыПоставки Экспорт;
+Перем ВариантПоставки Экспорт;
 Перем ВыходнойКаталог Экспорт;
 
 Перем Лог;
@@ -34,6 +35,11 @@
  Параметры = УправлениеКонфигуратором.ПолучитьПараметрыЗапуска();
 Параметры.Добавить("/CreateDistributive """ + ВыходнойКаталогОбъект.ПолноеИмя + """");
 Параметры.Добавить("-File """ + Манифест + """");
+
+Если Не ПустаяСтрока(ВариантПоставки) Тогда
+Параметры.Добавить("-Option """ + ВариантПоставки + """");
+КонецЕсли;
+
 Если СоздаватьФайлыПоставки Тогда
  Параметры.Добавить("-MakeFiles");
  ИначеЕсли СоздаватьИнсталлятор Тогда