Адаптация под портативную сборку.

Author: LevkinSergey

.vscode/launch.json

@@ -11,7 +11,7 @@
       "program": "${workspaceRoot}/src/builder/build.os",
       "args": [
         "--platformSource=/opt/1cv8/x86_64/8.3.12.1924",
-        "--versionEDT=edt@2022.2.3"
+        "--versionEDT=edt@2023.1.4"
       ],
       "cwd": "${workspaceRoot}",
       "env": {},
@@ -27,7 +27,7 @@
       "request": "launch",
       "program": "${workspaceRoot}/src/builder/build.os",
       "args": [
-        "--versionEDT=edt@2022.1.1",
+        "--versionEDT=edt@2023.1.4",
         "--exportEDT=true",
         "--cfe=false",
         "--cf=false",

src/builder/Классы/КонвертерИсходныхФайловВФорматКонфигуратора.os

@@ -40,11 +40,11 @@
 	Команда.ДобавитьПараметр("workspace");
 	Команда.ДобавитьПараметр("export");
 	Команда.ДобавитьПараметр("--configuration-files");
-	Команда.ДобавитьПараметр(КаталогРезультатаКонвертации);
+	Команда.ДобавитьПараметр(""""+КаталогРезультатаКонвертации+"""");
 	Команда.ДобавитьПараметр("--workspace-location");
-	Команда.ДобавитьПараметр(РабочийКаталогРИНГ);
+	Команда.ДобавитьПараметр(""""+РабочийКаталогРИНГ+"""");
 	Команда.ДобавитьПараметр("--project");
-	Команда.ДобавитьПараметр(КаталогИсходниковEDT);
+	Команда.ДобавитьПараметр(""""+КаталогИсходниковEDT+"""");
 	Команда.ПоказыватьВыводНемедленно(Истина);    
 	Команда.УстановитьКодировкуВывода(КодировкаТекста.Системная);
 

src/Инструменты/src/CommonForms/УИ_ФормаСсылкиНаКод/Form.form

@@ -310,9 +310,6 @@
     <use>
       <common>true</common>
     </use>
-    <picture xsi:type="core:PictureRef">
-      <picture>CommonPicture.УИ_СкопироватьВБуферОбмена</picture>
-    </picture>
     <action xsi:type="form:FormCommandHandlerContainer">
       <handler>
         <name>СкопироватьВБуфер</name>

src/Инструменты/src/CommonForms/УИ_ФормаСсылкиНаКод/Module.bsl

@@ -18,6 +18,8 @@
 		РежимВставки = Параметры.РежимВставки;
 	КонецЕсли;
 
+	Элементы.СкопироватьВБуфер.Картинка = БиблиотекаКартинок.УИ_СкопироватьВБуферОбмена;
+	
 	УстановитьВидимостьДоступность();
 КонецПроцедуры
 

src/Инструменты/src/CommonModules/УИ_БуферОбменаКлиент/Module.bsl

@@ -482,7 +482,11 @@
 #Область СлужебныеПроцедурыИФункции
 
 Функция ИмяМакетаКомпоненты()
-	Возврат "ОбщийМакет.УИ_КомпонентаДляРаботыСБуферомОбмена";
+	Если УИ_ОбщегоНазначенияКлиентСервер.ЭтоПортативнаяПоставка() Тогда
+		Возврат УИ_ПараметрыПриложения["ОбщийМакет.УИ_КомпонентаДляРаботыСБуферомОбмена"];
+	Иначе
+		Возврат "ОбщийМакет.УИ_КомпонентаДляРаботыСБуферомОбмена";
+	КонецЕсли;
 КонецФункции
 
 Функция КартинкаДляКопированияВБуфер(Картинка)

src/Инструменты/src/CommonModules/УИ_ГенераторКода/Module.bsl

@@ -32,7 +32,7 @@
 					  |//Имя файла инструмента - %2
 					  |//Имя - %3
 					  |//Пользователь - %5
-					  |%7
+					  |%6
 					  |",
 					  ТекущаяДатаСеанса(),
 					  ИмяФайлаИнструмента,

src/Инструменты/src/CommonModules/УИ_ОбщегоНазначенияКлиент/Module.bsl

@@ -4,24 +4,24 @@
 
 Процедура ПриНачалеРаботыСистемы() Экспорт
 	ПараметрыСтартаСеанса=УИ_ОбщегоНазначенияВызовСервера.ПараметрыСтартаСеанса();
-	
+
 	Если ПараметрыСтартаСеанса.ДобавленыПраваНаРасширение Тогда
 		ЗавершитьРаботуСистемы(Ложь, Истина);
 	КонецЕсли;
-	
+
 	УИ_ПараметрыПриложения.Вставить("НомерСеанса", ПараметрыСтартаСеанса.НомерСеанса);
 	УИ_ПараметрыПриложения.Вставить("ЯзыкСинтаксисаКонфигурации", ПараметрыСтартаСеанса.ЯзыкСинтаксисаКонфигурации);
-	
+
 	УИ_ПараметрыПриложения.Вставить("ЭтоLinuxКлиент", УИ_ОбщегоНазначенияКлиентСервер.ЭтоLinux());
 	УИ_ПараметрыПриложения.Вставить("ЭтоWindowsКлиент", УИ_ОбщегоНазначенияКлиентСервер.ЭтоWindows());
 	УИ_ПараметрыПриложения.Вставить("ЭтоВебКлиент", ЭтоВебКлиент());
 	УИ_ПараметрыПриложения.Вставить("ЭтоПортативнаяПоставка", УИ_ОбщегоНазначенияКлиентСервер.ЭтоПортативнаяПоставка());
 	УИ_ПараметрыПриложения.Вставить("ПолеHTMLПостроеноНаWebkit",
-	УИ_ОбщегоНазначенияКлиентСервер.ПолеHTMLПостроеноНаWebkit());
+									УИ_ОбщегоНазначенияКлиентСервер.ПолеHTMLПостроеноНаWebkit());
 	УИ_ПараметрыПриложения.Вставить("ВерсияПлатформы",
-	УИ_ОбщегоНазначенияКлиентСервер.ТекущаяВерсияПлатформы1СПредприятие());
+									УИ_ОбщегоНазначенияКлиентСервер.ТекущаяВерсияПлатформы1СПредприятие());
 	//УИ_ПараметрыПриложения.Вставить("АдресОписанияМетаданныхКонфигурации", УИ_ОбщегоНазначенияВызовСервера.АдресОписанияМетаданныхКонфигурации());
-	
+
 	ПараметрыСеансаВХранилище = Новый Структура;
 	ПараметрыСеансаВХранилище.Вставить("ЭтоLinuxКлиент", УИ_ПараметрыПриложения["ЭтоLinuxКлиент"]);
 	ПараметрыСеансаВХранилище.Вставить("ЭтоВебКлиент", УИ_ПараметрыПриложения["ЭтоВебКлиент"]);
@@ -30,11 +30,11 @@
 	ПараметрыСеансаВХранилище.Вставить("ПолеHTMLПостроеноНаWebkit", УИ_ПараметрыПриложения["ПолеHTMLПостроеноНаWebkit"]);
 	ПараметрыСеансаВХранилище.Вставить("ВерсияПлатформы", УИ_ПараметрыПриложения["ВерсияПлатформы"]);
 	//ПараметрыСеансаВХранилище.Вставить("АдресОписанияМетаданныхКонфигурации", УИ_ПараметрыПриложения["АдресОписанияМетаданныхКонфигурации"]);
-	
-	УИ_ОбщегоНазначенияВызовСервера.ХранилищеОбщихНастроекСохранить(
-	УИ_ОбщегоНазначенияКлиентСервер.КлючОбъектаВХранилищеНастроек(),
-	УИ_ОбщегоНазначенияКлиентСервер.КлючНастроекПараметровСеанса(), ПараметрыСеансаВХранилище);
-	
+
+	УИ_ОбщегоНазначенияВызовСервера.ХранилищеОбщихНастроекСохранить(УИ_ОбщегоНазначенияКлиентСервер.КлючОбъектаВХранилищеНастроек(),
+																	УИ_ОбщегоНазначенияКлиентСервер.КлючНастроекПараметровСеанса(),
+																	ПараметрыСеансаВХранилище);
+
 КонецПроцедуры
 
 #КонецОбласти

src/Инструменты/src/CommonModules/УИ_РедакторКодаСервер/Module.bsl

@@ -135,9 +135,13 @@
 	ОписаниеПодменюИнтеграцииСPaste1C.Вид = ВидГруппыФормы.Подменю;
 	ОписаниеПодменюИнтеграцииСPaste1C.Имя = ГруппаКомманднойПанели.Имя +"_ПодменюИнтеграцииССервисомХраненияКода_"+ИдентификаторРедактора;
 	ОписаниеПодменюИнтеграцииСPaste1C.ОтображатьЗаголовок = Ложь;
+	ОписаниеПодменюИнтеграцииСPaste1C.Заголовок = "Paste 1C";
+
 //	ОписаниеПодменюИнтеграцииСPaste1C.Отображение = ОтображениеОбычнойГруппы.Нет;
 	Подменю = УИ_РаботаСФормами.СоздатьГруппуПоОписанию(Форма, ОписаниеПодменюИнтеграцииСPaste1C);
-	Подменю.Картинка = БиблиотекаКартинок.УИ_Поделиться;
+	Если Не УИ_ОбщегоНазначенияКлиентСервер.ЭтоПортативнаяПоставка() Тогда
+		Подменю.Картинка = БиблиотекаКартинок.УИ_Поделиться;
+	КонецЕсли;
 
 	ОписаниеКнопки = УИ_РаботаСФормами.НовыйОписаниеКомандыКнопки();
 	ОписаниеКнопки.Имя = УИ_РедакторКодаКлиентСервер.ИмяКнопкиКоманднойПанели(УИ_РедакторКодаКлиентСервер.ИмяКомандыПоделитьсяАлгоритмом(),

src/Портативный/src/ExternalDataProcessors/УИ_ПортативныеУниверсальныеИнструменты/Forms/Форма/Form.form

@@ -1110,6 +1110,24 @@
       <common>true</common>
     </edit>
   </attributes>
+  <attributes>
+    <name>АдресДвоичныхДанныхКомпонентыРаботыСБуферомОбмена</name>
+    <title>
+      <key>ru</key>
+      <value>Адрес двоичных данных компоненты работы с буфером обмена</value>
+    </title>
+    <id>7</id>
+    <valueType>
+      <types>String</types>
+      <stringQualifiers/>
+    </valueType>
+    <view>
+      <common>true</common>
+    </view>
+    <edit>
+      <common>true</common>
+    </edit>
+  </attributes>
   <formCommands>
     <name>ВопросРазработчику</name>
     <title>

src/Портативный/src/ExternalDataProcessors/УИ_ПортативныеУниверсальныеИнструменты/Forms/Форма/Module.bsl

@@ -28,7 +28,11 @@
 
 	АлгоритмВызоваОтладкиНаСервере="ВнешниеОбработки.Создать(""УИ_"")._От(ПараметрыОтладки)";
 	АлгоритмВызоваОтладкиНаКлиенте="ПолучитьФорму(""ВнешняяОбработка.УИ_.Форма"")._От(ПараметрыОтладки)";
-	АлгоритмВызоваОтладкиЧерезОбработку="ВнешниеОбработки.Создать("""+ОбработкаОбъект.ИспользуемоеИмяФайла+""", Ложь)._От(Запрос)";
+	АлгоритмВызоваОтладкиЧерезОбработку="ВнешниеОбработки.Создать(""" + ОбработкаОбъект.ИспользуемоеИмяФайла
+		+ """, Ложь)._От(Запрос)";
+
+	АдресДвоичныхДанныхКомпонентыРаботыСБуферомОбмена = ПоместитьВоВременноеХранилище(ОбработкаОбъект.ПолучитьМакет(
+		"УИ_КомпонентаДляРаботыСБуферомОбмена"), УникальныйИдентификатор);
 КонецПроцедуры
 
 &НаКлиенте
@@ -38,7 +42,7 @@
 
 &НаКлиенте
 Процедура ПередЗакрытием(Отказ, ЗавершениеРаботы, ТекстПредупреждения, СтандартнаяОбработка)
-	УИ_ОбщегоНазначенияКлиент.ПриЗавершенииРаботыСистемы();
+	//УИ_ОбщегоНазначенияКлиент.ПриЗавершенииРаботыСистемы();
 КонецПроцедуры
 
 &НаКлиентеНаСервереБезКонтекста
@@ -349,10 +353,18 @@
 
 	УИ_ОбщегоНазначенияКлиент.ПриНачалеРаботыСистемы();
 
+	УИ_ПараметрыПриложения_Портативные["ОбщийМакет.УИ_КомпонентаДляРаботыСБуферомОбмена"] = АдресДвоичныхДанныхКомпонентыРаботыСБуферомОбмена;	
+	
 	Элементы.ГруппаСтраницыФормы.ТекущаяСтраница=Элементы.ГруппаСтраницаРаботыСИнструментами;
 
 КонецПроцедуры
 
+&НаСервере
+Функция ПоместитьОбщийМакетВоВременноеХранилищеКомпонентуРаботыСБуферомОбмена()
+	ОбработкаОбъект = РеквизитФормыВЗначение("Объект");
+	
+КонецФункции
+
 &НаСервере
 Функция ПодключитьВнешнююОбработку(АдресХранилища, ЭтоОтчет)