1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2024-12-25 02:42:28 +02:00
Code Issues Releases Activity

Update Module.bsl

Browse Source
This commit is contained in:
Anton Titovets 2024-12-21 20:07:34 +03:00
parent 3f628e427f
commit fff644cadf
1 changed files with 20 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
src/ru/OPI/src/CommonModules/OPI_TCP/Module.bsl
View File

@ -57,7 +57,7 @@
OPI_ПреобразованиеТипов.ПолучитьСтроку(Адрес);
TCPКлиент = OPI_Инструменты.ПолучитьКомпоненту("TCPClient");
TCPКлиент = ПодключитьКомпонентуНаСервере("OPI_TCPClient");
TCPКлиент.Address = Адрес;
@ -229,3 +229,22 @@
#КонецОбласти
#КонецОбласти
#Область СлужебныеПроцедурыИФункции
Функция ПодключитьКомпонентуНаСервере(Знач ИмяКомпоненты, Знач Класс = "Main")
Если OPI_Инструменты.ЭтоOneScript() Тогда
ИмяМакета = OPI_Инструменты.КаталогКомпонентOS() + ИмяКомпоненты + ".zip";
Иначе
ИмяМакета = "ОбщийМакет." + ИмяКомпоненты;
КонецЕсли;
ПодключитьВнешнююКомпоненту(ИмяМакета, ИмяКомпоненты, ТипВнешнейКомпоненты.Native);
Компонента = Новый("AddIn." + ИмяКомпоненты + "." + Класс);
Возврат Компонента;
КонецФункции
#КонецОбласти