.Net Core, обмен с 1C по TCP/IP между различными устройствами

28.09.16

Разработка - Разработка внешних компонент

Часто нужно обмениваться данными с клиентом 1С из различных устройств, между клиентами 1С, а также при виртуализации между разными ОС на компьютере. Это кроссплатформенная ВК, позволяющая обмениваться сообщениями по TCP/IP между различными устройствами по определенному протоколу.

Начну с «Вести с полей»: вышло обновление Updates in .NET Core 1.0.1. Главное из этого для меня было Access violation on Windows – coreclr 6460:

In Jitstartup, JIT creates a file descriptor for stdout and unconditionally passes it to setmode, without checking for failures. This happens at. Failure to check for invalid descriptors can result in setmode triggering failfast.


Из-за этой ошибки вылетало исключение при вызове статического .Net-метода в 64 разрядном клиенте 1С.
В 

Необработанное исключение по адресу 0x00007FFD76FB8528 (ucrtbase.dll) в 1cv8.exe: Недопустимый параметр был передан функции, для которой недопустимые параметры вызывают неустранимую ошибку.


   Сейчас починили, и код прекрасно выполняется под 64 разрядным клиентом на 8.3.9. В примерах заменил библиотеки .NET Core на 1.0.1. Хотел написать про SignalR, но пока можно написать только сервер на .Net Core — ASP.NET Core SignalR for Windows 10 UWP App

aspnet/SignalR-Server

   Клиента пока нет. В WCF пока только клиент под Web сервис. ServiceHost нет. Есть стороннее решение .NET core cross platform remote service invocation

   Но решил написать решение из своего опыта 8 летней давности для обмена данными по TCP/IP между ТСД на Win CE и 1С еще 7-ки. Конечно, с 1С можно обмениваться через Web-сервисы, но есть задачи, где нужно взаимодействие с оператором для выбора данных, брать данные, подготовленные на клиенте, печать на мобильный принтер.

   Основные проблемы связаны с сетями с плохим соединением на складах. Поэтому, нужно было уменьшить трафик за счет сжатия данных. Так, при работе в терминальных сессиях были проблемы с проброской портов в медленных сетях — Тормозит печать чека на фискальный регистратор через RDP.

   Также были проблемы при считывании двумерного штрихкода. Медленная печать с терминального сервера. Для решения этих проблем на машине клиента устанавливалась локальная 1С, которая работала как клиент и сервер. Данные со сканеров отправлялись на терминальный сервер и там обрабатывались. Для печати на фискальный регистратор отправлялись данные с сервера по TCP/IP, и с локальной 1С печатался чек. При печати этикеток с сервера оправлялись данные, на основании которых на локальной 1С формировался документ и отправлялся на печать.

   Кроме того, под многое оборудование для Linux нет драйверов. Можно, используя виртуализацию, держать Linux и Windows на одной машине, на Windows считывать данные и обмениваться с Linux по TCP/IP.

   Сейчас много у кого есть ТСД под WinCe, WinMo (недавно предлагали работу по настройке обмена на них). Кроме того, можно использовать ТСД на других осях, используя UWP и Xamarin.

   Кроме того, можно обмениваться сообщениями между клиентами 1С, наподобие чата.

  В большом .Net я часто использую обмен по TCp/IP
Использование сборок .NET в 1С 7.x b 8.x. Создание внешних Компонент.

Использование ТСД на WM 6 как беспроводной сканер с получением данных из 1С

  Поэтому я решил написать этот же обмен, но на .Net Core, и добавить новый подход.

  Чистые 1С-ники могут пропустить вражеский код и перейти к родному в конце статьи, как использовать данную компоненту.

  Нужно было создать класс для обмена сообщениями с сжатыми данными.
  Для отправки данных использовался метод

        // Отправляем команду на сервер 
        // Отправляем данные на сервер
        // string Команда имя метода который будет обрабатывать данные
        // string ДанныеДляКоманды это сериализованные данные в виде строки
        // bool ЕстьОтвет признак функции или процедуры метода обрабатывающего данные
        public ДанныеОтветаПоTCP ОтправитьКоманду(string АдресСервера, int порт, string Команда, string ДанныеДляКоманды, bool ЕстьОтвет)



   На стороне 1С принимается такой класс

 // Данные отправляемые в 1С для обработки запроса
    public class ДанныеДляКлиета1С
    {

        public bool ЕстьОтвет;
        public string Команда;
        public string Данные;
        TcpClient Клиент;
        public ДанныеДляКлиета1С(СтруктураСообщения Даннные, TcpClient Клиент)
        {

            this.ЕстьОтвет = Даннные.ЕстьОтвет;
            this.Команда = Даннные.Команда;
            this.Данные = Даннные.Данные;

            if (ЕстьОтвет)
                this.Клиент = Клиент;
            else // Если нет ответа то закрываем соединение
            {
                Клиент.Dispose();
                this.Клиент = null;
            }
        }


        // Отсылаем данные клиенту
        //Создадим новую задачу, что бы основной поток 1С не ждал отпраки
        //Ответ пытаемся сжать
        public void Ответить(string Ответ)
        {
            Task.Run(() =>
            {
                var strim = Клиент.GetStream();
                ДляОбменаПоТСП.WriteCompressedString(strim, Ответ);
// Закроем соединение
                strim.Dispose();
                Клиент.Dispose();

            });

        }

        public override string ToString()
        {
            return $"ЕстьОтвет={ЕстьОтвет}, Команда={Команда}, Данные={Данные}";
        }
    }



   Модуль для формирования сообщений, который был написан 8 лет назад, с небольшими изменениями.
   Уже тогда я вовсю использовал Руслиш.

   На сервере создается класс для прослушивания

// Класс для получения и отправки сообщений
    public class TCPConnector
    {
        
        TcpListener Server;

        // Будем записывать ошибки в файл
        // Нужно прописать в зависимости "System.Diagnostics.TextWriterTraceListener"
        // Файл будет рядом с этой DLL
        TextWriterTraceListener myTextListener;

        // Устанавливаем флаг при закрытии
        bool ЭтоЗакрытие = false;
        // Клиент для отпраки сообщений на сервер
        Socket клиент;
       
        // делегат для вызова внешнего события в 1С
        // Который ставит сообщение в очередь событий в 1С
        public Action<string, string, object> ВнешнееСобытие1С;

        //Делегат для вывода ошибки в окне сообщений
        public Action<string> СообщитьОбОшибкев1С;

        // Получаем директорию сборки содержащий данный класс
        string AssemblyDirectory
        {
            get
            {
                string codeBase = typeof(TCPConnector).GetTypeInfo().Assembly.Location;
                UriBuilder uri = new UriBuilder(codeBase);
                string path = Uri.UnescapeDataString(uri.Path);
                return Path.GetDirectoryName(path) + "\\";
            }
        }

        public TCPConnector()
        {


            myTextListener = null;

        }

        // Записываем ошибку a файл и сообщаем об ошибке в 1С
        void ЗаписатьОшибку(string Ошибка)
        {
            if (myTextListener == null)
            {
                try
                {
                    FileStream fs = new FileStream(AssemblyDirectory + @"ТрассировкаОтладки",
                    FileMode.OpenOrCreate, FileAccess.Write, FileShare.ReadWrite);

                    StreamWriter myOutputWriter = new StreamWriter(fs, Encoding.GetEncoding(1251));
                    myTextListener = new TextWriterTraceListener(myOutputWriter);
                    Trace.Listeners.Add(myTextListener);

                }
                catch (Exception)
                {

                 // проглотим ошибку что бы приложение закрылось
                }
            }

            Trace.WriteLine(Ошибка);
            Trace.Flush();
            СообщитьОбОшибкев1С?.DynamicInvoke(Ошибка);
        }



        // Откроем порт и количество слушющих задач которое обычно равно подсоединенным устройствам
        // Нужно учитывть, что 1С обрабатывает все события последовательно ставя события в очередь
        public void Открыть(int НомерПорта = 6891, int КоличествоСлушателей = 1)
        {
            ЭтоЗакрытие = false;

            IPEndPoint ipEndpoint = new IPEndPoint(IPAddress.Any, НомерПорта);
            Server = new TcpListener(ipEndpoint);
            Server.Start();

            // Создадим задачи для прослушивания порта
            //При подключении клиента запустим метод ОбработкаСоединения
            // Подсмотрено здесь https://github.com/imatitya/netcorersi/blob/master/src/NETCoreRemoveServices.Core/Hosting/TcpServerListener.cs
            for (int i = 0; i < КоличествоСлушателей; i++)
                Server.AcceptTcpClientAsync().ContinueWith(ОбработкаСоединения);

        }


// Метод для обработки сообщения от клиента
        private void ОбработкаСоединения(Task<TcpClient> task)
        {

            if (task.IsFaulted || task.IsCanceled)
            {
                // Скорее всего вызвано  Server.Stop();
                return;
            }

            // Получим клиента
            TcpClient client = task.Result;

            // И вызовем метод для обработки данных
            // 
            ВыполнитьКоманду(client);

            // Если Server не закрыт то запускаем нового слушателя
            if (!ЭтоЗакрытие)
                Server.AcceptTcpClientAsync().ContinueWith(ОбработкаСоединения);

        }


       

        private void ВыполнитьКоманду(TcpClient client)
        {

            NetworkStream стрим = client.GetStream();
            try
            {

                // Получим данные с клиента и на основании этих данных
                //Создадим ДанныеДляКлиета1С котрый кроме данных содержит 
                //TcpClient для отправки ответа
                var Данные = new ДанныеДляКлиета1С(ДляОбменаПоТСП.ПринятьКоманду(стрим), client);

                // Вызвается метод 1С для постановки сообщения в очередь
                // Которое будет обработано через ВнешнееСобытие
                ВнешнееСобытие1С?.DynamicInvoke("TCPConnector", Данные.Команда, Данные);

            }
            catch (Exception e)
            {
                ЗаписатьОшибку(DateTime.Now.ToString() + e.ToString());

            }
        }


        // Закроем ресурсы
        public void Закрыть()
        {
            if (Server != null)
            {
                ЭтоЗакрытие = true;
                Server.Stop();
                Server = null;


            }
            if (myTextListener != null)
            {

                Trace.Listeners.Remove(myTextListener);
                myTextListener.Dispose();
            }

        }



   Все достаточно просто. При соединении считываем данные, создаем объект для отправки в 1С. Запускаем нового слушателя.

Отправка сделана на голых сокетах, можно посмотреть в исходниках.

Упрощенно это выглядит так

IPEndPoint ipEndpoint = new IPEndPoint(IPAddress.Parse(АдресСервера), порт); //6891 по умолчанию
                клиент = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);
                клиент.Connect(ipEndpoint);

                var поток= new NetworkStream(клиент);
                ДляОбменаПоТСП.ОтправитьКоманду(поток, Команда, ДанныеДляКоманды, ЕстьОтвет);
                
                // считываем сжатые данные в строку
                if (ЕстьОтвет) result = ДляОбменаПоТСП.ReadCompressedString(strim);

               поток.Dispose();
               клиент.Dispose();


Вот как это обрабатывается в 1С

// В Net core для NetStandard System.Threading.Tasks не существует 
	 Task=ъТип("System.Threading.Tasks.Task","System.Threading.Tasks");

Процедура СоздатьСерверTCP()
	 
	 Если СерверTCP<>Неопределено Тогда
		 возврат
	 КонецЕсли; 
	 
	 TCPConnector=ъТип("TCPConnectTo1C.TCPConnector","ОбменПоTCPIPCore.dll");
	 СерверTCP=ъНовый(TCPConnector.ПолучитьСсылку());
	 Ссылка=СерверTCP.ПолучитьСсылку();
	 Врап.УстановитьДелегатДляВызоваВнешнегоСобытия(Ссылка,"ВнешнееСобытие1С");
	 Врап.УстановитьДелегатДляСообщенииОбОшибке(Ссылка,"СообщитьОбОшибкев1С");
	 
 КонецПроцедуры// СоздатьTCP()
 
 Процедура ТестTCPConnectНажатие(Элемент)
	 
	 // Установим размер очереди событий равный удвоенному количеству
	 //обслуживаемых устройств
	 // Но нужно учесть, что запросы без ответа ставятся в очередь 1С 
	 // и сразу закрывается соединение
	 // Клиент не ждет
	 // Если будут проблемы нужно посылать запрос с ответом
	 Сообщить(Врап.УстановитьРазмерОчередиСобытий(3*2));
	 Сообщить(Врап.УстановитьРазмерОчередиСобытий(3*2));
	 СоздатьСерверTCP();
	 СерверTCP.Открыть(6891,3);
	 
	 ЭлементыФормы.ДанныеДляОтправки.Видимость=ложь;
	 ЭлементыФормы.ОтправитьКоманды.Видимость=ложь;
	 ЭлементыФормы.НадписьДанныеДляОтправки.Видимость=ложь;
	 
 КонецПроцедуры
 
 Процедура СканированШК(знач Данные)
	 
	 // Съэмулируем долгую обработку для проверки очереди событий
	 ъ(Task.Delay(1000)).Wait();
	 Ответ="Ответ на команду "+Данные.Команда+"
	 |Данные "+Данные.Данные+"
	 |ВремяНаСервере="+XmlСтрока(ТекущаяДата());
	 Данные.Ответить(Ответ);
 КонецПроцедуры
 
 Процедура ВыполнитьБезОтвета(знач Данные)
	 // Съэмулируем долгую обработку для проверки очереди событий
	 ъ(Task.Delay(1000)).Wait();
 КонецПроцедуры
 
 // Для теста из других компонент
 Процедура ПолучениеДанныхПоTCP(знач Данные)
	 Сообщить("Команда="+Данные.Команда);
	 Сообщить("Данные="+Данные.Данные);
	 Сообщить("ЕстьОтвет="+Данные.ЕстьОтвет);	
	 
	 ъ(Task.Delay(1000)).Wait();
	 Если Данные.ЕстьОтвет Тогда
		 Ответ="Ответ на команду "+Данные.Команда+"
		 |Данные "+Данные.Данные+"
		 |ВремяНаСервере="+XmlСтрока(ТекущаяДата());
		 Данные.Ответить(Ответ);
	 КонецЕсли; 
	 
 КонецПроцедуры
 
 
 Процедура ВнешнееСобытие(Источник, Событие, Данные)
	 
	 Если Источник="TCPConnector" Тогда
               //Получим объект по переданной ссылке
		 Данные=ъ(Данные);
		 Сообщить("Данные="+Врап.ВСтроку(Данные.ПолучитьСсылку()));
		 // Тест из отчета  ТестNetObjectToIDispatch
		 Если Событие="Тест Отправки Сообщения" Тогда
			 
			 ПолучениеДанныхПоTCP(Данные)	
		 иначе
               // Запускаем метод переданный в коанде
			 Выполнить(Событие+"(Данные)");
			 
		 КонецЕсли; 
	 КонецЕсли; 
	 
 КонецПроцедуры
 
 Процедура ОтправитьКоманду(знач КлиентTCP,ServerAdress,порт,Команда,ДанныеДляКоманды,ЕстьОтвет)
	 
	 резулт=ъ(КлиентTCP.ОтправитьКоманду(ServerAdress,порт,Команда,ДанныеДляКоманды,ЕстьОтвет));
	 Сообщить(Врап.ВСтроку(резулт.ПолучитьСсылку()));	
	 Если резулт.ОшибкаСоединения Тогда
		 СтрОшибки="ОшибкаСоединения
		 |"+резулт.Данные;
		 Предупреждение(СтрОшибки);
	 КонецЕсли;
	 
	 
 КонецПроцедуры
 
 Процедура ОтправитьКомандыНажатие(Элемент)
	 СоздатьСерверTCP();
	 КлиентTCP=СерверTCP;
	 ServerAdress="127.0.0.1";
	 порт=6891;
	 Команда="Тест Отправки Сообщения";
	 ДанныеДляКоманды=XmlСтрока(ТекущаяДата());
	 
	 ЕстьОтвет=истина;
	 ЗакрытьСоединение=истина;
	 ОшибкаСоединения=false;
	 
	 Для сч=1 По 3 Цикл
		 
		 ОтправитьКоманду(КлиентTCP,ServerAdress,порт,Команда,ДанныеДляКоманды,истина);
		 ОтправитьКоманду(КлиентTCP,ServerAdress,порт,"ВыполнитьБезОтвета",ДанныеДляОтправки,ложь);
		 ОтправитьКоманду(КлиентTCP,ServerAdress,порт,"СканированШК","12345678901",истина);
	 КонецЦикла; 	
	 
 КонецПроцедуры
 
 Процедура ПриЗакрытии()
	 // Вставить содержимое обработчика.
	 Если СерверTCP<> неопределено Тогда
		 
		 СерверTCP.Закрыть();
		 СерверTCP=Неопределено;
	 КонецЕсли; 
	 
	 GC=ъТип("System.GC");
	 GC.Collect();
	 GC.WaitForPendingFinalizers();
	 Врап=Неопределено;
	 
 КонецПроцедуры



   Ответ передаем через полученный объект

 Данные.Ответить(Ответ);


По умолчанию очередь событий в 1С равна 1. Поэтому 1 задача может выполняться, а еще одна дожидаться в очереди.

Так как можно работать с несколькими устройствами, то нужно установить нужный размер очереди через

Врап.УстановитьРазмерОчередиСобытий(размер очереди));


Который возвращает текущий размер очереди.

Конечно, можно запустить несколько приложений 1С и запустить TCP/IP сервер под разными портами, но на практике операторы путаются. Чем проще для них, тем лучше.

Для установки нужных делегатов используются методы

Врап.УстановитьДелегатДляВызоваВнешнегоСобытия(Ссылка,"ВнешнееСобытие1С");
Врап.УстановитьДелегатДляСообщенииОбОшибке(Ссылка,"СообщитьОбОшибкев1С");


В зависимости от типа делегата устанавливается нужный делегат

   if (ReturnType == typeof(Action<string, string, object>)) return new Action<string, string, object>(ВызватьВнешнееСобытиеСОбъектом);

   if (ReturnType == typeof(Action<string, string, string>)) return new Action<string, string, string>(AutoWrap.ВызватьВнешнееСобытие1С);

Конечно, можно использовать события и динамическую компиляцию 1С,.Net Core. Динамическая компиляция класса обертки для получения событий .Net объекта в 1С

Но раз пишем под 1С, то проще объявить делегаты нужного типа, и установить из 1С.

Для теста нужно использовать 3 клиентов 1С и вызвать ТестОбменПоTCPIP.epf для проверки очереди событий в 1С.

Исходники можно скачать Здесь

Подправил. У вас нет тэга C#. Поэтому некоторые конструкции отображаются неверно при выборе Java. 1C для кода поставил. Прошу прощения

См. также

Медиадисплей. Рекламный информационный монитор для покупателя.

Разработка внешних компонент POS терминал Рабочее место Розничная торговля Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление торговлей 10 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Розничная и сетевая торговля (FMCG) Рестораны, кафе и фаст-фуд Реклама, PR и маркетинг Управленческий учет Платные (руб)

Монитор покупателя может отображать текущую покупку на кассовом месте, показывать видеорекламу, баннеры, во время простоя разворачивать рекламу на весь экран. Можно использовать в качестве графического меню-борда в кафе и видеовывески. Управление выводом на телевизор через hdmi-приставку на базе Windows или Android. В качестве устройства отображения можно использовать Android-планшеты, фоторамки с Android, монитор любого Windows-компьютера, доступного по сети. Настраивается ЛЮБОЙ ДИЗАЙН экрана!

16800 руб.

30.05.2017    52116    34    69    

43

Внешняя компонента для сканирования (замена TWAIN-компоненты БСП) (Native Win 32/64)

Разработка внешних компонент Платформа 1С v8.3 Конфигурации 1cv8 Платные (руб)

Внешняя компонента позволяет работать c TWAIN-совместимым оборудованием (сканерами, камерами) . Полностью совместима со стандартной TWAIN-компонентой из БСП и может применяться как ее замена без изменения вызовов, при этом может работать с 64-разрядной платформой, а так же имеет расширенную функциональность, например, сохранение результата непосредственно в PDF без использования сторонних утилит. Прекрасно работает на сервере, тонком клиенте и веб-клиенте (проверена работа в браузерах Google Chrome, Mozilla Firefox и Microsoft Internet Explorer).

2400 руб.

12.05.2020    26253    131    99    

83

Внешняя компонента для подключения 1С к телефонии Asterisk

Разработка внешних компонент Телефония, SIP Платформа 1С v8.3 Конфигурации 1cv8 Россия Платные (руб)

Внешняя компонента выполнена по технологии Native API для 1С 8.х, обеспечивает доступ к программным АТС Asterisk (FreePBX, Elastix) через AMI интерфейс. Через него можно управлять многими функциями Asterisk (определение номеров, перевод звонков, набор телефона и т. д.)

2400 руб.

04.05.2018    44988    117    64    

60

Внешняя компонента печати PDF (Native Win 32/64)

Разработка внешних компонент Платформа 1С v8.3 Конфигурации 1cv8 Платные (руб)

Внешняя компонента позволяет печатать PDF файлы непосредственно из 1С, не используя при этом сторонних программ. Прекрасно работает на сервере, тонком клиенте и веб-клиенте. Основана на проекте PDFium из состава проекта Chromium/Chrome

1500 руб.

17.09.2018    35089    104    123    

111

Мастер создания внешних компонент 1С (технология COM) для DELPHI 6/7/8/2005/2006/2007/2008/2010/XE/XE2/XE3

Разработка внешних компонент Платформа 1С v8.3 Платные (руб)

Средство для сверхбыстрой разработки внешних компонент 1С:Предприятия 7.7 и 8 по технологии COM на всех версиях DELPHI, начиная с 6.

2000 руб.

28.03.2013    54006    35    14    

68

QR-код с логотипом компании (обычная и управляемая форма)

Разработка внешних компонент Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Как известно, стремление сделать свою рекламную продукцию запоминающейся и выделяющейся — верный путь к успеху. Сегодня, мы поговорим с вами о том, что можно сделать с обычным черно-белым QR-кодом, чтобы он стал более живым и привлекательным. Если вам не терпится попробовать сделать QR-код с логотипом компании, то эта обработка для вас!

2400 руб.

22.06.2016    30844    4    4    

8

Внешняя компонента 1С и С++. Продолжаем разговор.

Разработка внешних компонент Платформа 1С v8.3 Бесплатно (free)

А давайте запилим 8.3.26 до релиза, или оповещение с сервера...

19.02.2024    4044    starik-2005    28    

52

Внешние компоненты 1С и язык C++

Разработка внешних компонент Механизмы платформы 1С Платформа 1С v8.3 Бесплатно (free)

Некоторые практические аспекты создания внешних компонент на языке С++ для платформы 1С 8.3++.

26.01.2024    4788    starik-2005    32    

39
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. akrub 26.02.17 12:45 Сейчас в теме
1c-ка падает намертво при выполнении Врап.СоздатьОбертку(CoreClrDir,ДиректорияNetObjectToNative,"");
что я делаю не так?
2. Serginio 938 26.02.17 15:01 Сейчас в теме
1C случайно не 64 разрядная?
3. Serginio 938 26.02.17 15:03 Сейчас в теме
Да и пока сделана только под Windows

Так же есть под виндовс http://infostart.ru/public/238584/ там есть пример обмена по Tcp/IP
4. Darklight 32 27.07.17 17:01 Сейчас в теме
(3) Говорим о кросплатформенности, но работает только по windows, в чём прикол?
В NativeAPI как раз интересна работа на Linux, на MacOS и ещё Mobile 1C: Android, iOS, Windows RT
5. Serginio 938 27.07.17 17:43 Сейчас в теме
(4) Нужно перекомпилировать нативную часть на С++ под нужную ось.
Что касается управляемой части на .Net, то она то как раз кроссплатформенна и компилируется в рантайме под нужную ось.
Просто мало кому в итоге эта кроссплатформенность оказалась нужна.
10. Ксакеп 63 26.10.20 16:36 Сейчас в теме
(5) Как оказалось, просто "перекомпилить" не работает. Код написан с использованием чисто виндовых библиотек, таких как SDKDDKVer.h, или tchar.h.
6. Serginio 938 27.07.17 17:52 Сейчас в теме
(4) Вот здесь есть ссылки на реализацию доступа к .Net классам из натива на разных осях
Кроссплатформенное использование классов .Net из неуправляемого кода. Или аналог IDispatch на Linux
9. KamranV21 81 28.09.20 10:06 Сейчас в теме
(3)

Здравствуйте! Можете, пожалуйста, помочь на другой ветке? Пытаюсь использовать сборку на .NET для подключения по Bluetooth, но пока безуспешно.

https://forum.infostart.ru/forum28/topic248274/
7. Xershi 1475 24.12.17 20:17 Сейчас в теме
		
	ОберткаКомпонент.СоздатьОбертку(ДобавочныйКаталогКомпоненты, КаталогКомпоненты, "");
	ОберткаКомпонент.ЗагрузитьDLL(ПолныйПутьКомпоненты);

Падает платформа 1С:Предприятие 8.3 (8.3.10.2650) файловый вариант, вин7 64-бита.
Так же не работает установка, если делать из макета:
// Через двоичные данные не работает!
	//УстановитьВнешнююКомпоненту(МестоположениеКомпоненты);
			
	//Если ПодключитьВнешнююКомпоненту(МестоположениеКомпоненты, "NetObjectToNative", ТипВнешнейКомпоненты.Native) Тогда
	

Компоненту брал по ссылке в статье!
8. Xershi 1475 24.12.17 21:39 Сейчас в теме
Нашел почему не работало через установку компоненты:
Подготовка внешних компонент для загрузки в конфигурацию

Внешние компоненты могут быть упакованы в ZIP-архив. Для работы с Веб-клиентом и тонким клиентом – это обязательное условие. В него должны войти собственно компоненты для ОС Windows (x86, x86_64), GNU/Linux (x86, x86_64), созданные расширения для Internet Explorer (x86, x86_64) и Firefox (Windows x86, GNU/Linux x86 и x86_64). В составе архива включается файл MANIFEST.XML с описанием содержимого:

<?xml version="1.0" encoding="UTF-8" ?>
<bundle xmlns="http://v8.1c.ru/8.2/addin/bundle">
<component os="Windows" path="AddIn_FF6Windows_x86.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="i386" client="Firefox" clientVersion="6.*" />
<component os="Linux" path="AddIn_FF6Linux_x86.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="i386" client="Firefox" clientVersion="6.*" />
<component os="Linux" path="AddIn_FF6Linux_x86_64.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="x86_64" client="Firefox" clientVersion="6.*" />
<component os="Windows" path="AddIn_FF19Windows_x86.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="i386" client="Firefox" clientVersion="19.*" />
<component os="Linux" path="AddIn_FF19Linux_x86.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="i386" client="Firefox" clientVersion="19.*" />
<component os="Linux" path="AddIn_FF19Linux_x86_64.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="x86_64" client="Firefox" clientVersion="19.*" />
<component os="Windows" path="AddIn_FF22Windows_x86.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="i386" client="Firefox" clientVersion="22.*" />
<component os="Linux" path="AddIn_FF22Linux_x86.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="i386" client="Firefox" clientVersion="22.*" />
<component os="Linux" path="AddIn_FF22Linux_x86_64.xpi" type="plugin" object="@vendor.ru/ClassService;1" arch="x86_64" client="Firefox" clientVersion="22.*" />
<component os="Windows" path="Addin_IEWindows_x86.cab" type="plugin" object="MyComponenIE.AddInServiceEx" arch="i386" client="MSIE" />
<component os="Windows" path="AddIn_IEWindows_x86_64.cab" type="plugin" object=" MyComponenIE.AddInServiceEx" arch="x86_64" client="MSIE" />
<component os="Windows" path="AddIn_NPAPIWindows_x86.msi" type="plugin" object=" application/component-example-1" arch="i386" client="Chrome" />
<component os="Linux" path="AddIn_ChrLinux_x86.crx" type="plugin" object=" application/component-example-1" arch="i386" client="Chrome" />
<component os="Linux" path="AddIn_ChrLinux_x86_64.crx" type="plugin" object=" application/component-example-1" arch="x86_64" client="Chrome" />
<component os="Windows" path="AddIn_NPAPIWindows_x86.msi" type="plugin" object=" application/component-example-1" arch="i386" client="Safari" />
<component os="MacOS" path="AddIn_SafMacOS_x86.pkg" type="plugin" object=" application/component-example-1" arch="i386" client="Safari" />
<component os="Windows" path="AddInNative.dll" type="native" arch="i386" />
<component os="Windows" path="AddInNative64.dll" type="native" arch="x86_64" />
<component os="Linux" path="AddInNative.so" type="native" arch="i386" />
<component os="Linux" path="AddInNative64.so" type="native" arch="x86_64" />
</bundle>,
Где:

os – операционная система:
Windows;
Linux;
path – название файла в архиве;
type – тип компоненты:
plugin – расширение для браузера;
native – Native-компонента;
com – COM-компонента.
object – название объекта, который будет создаваться браузером;
arch – для какой архитектуры процессора должна использоваться компонента:
i386 – 32-х разрядный процессор;
x86_64 – 64-х разрядный процессор;
Client – используется для указания используемого веб-клиентом браузера:
MSIE – Microsoft Internet Explorer;
Firefox – Mozilla Firefox;
clientVersion – версия браузера.
Соответствие версий clientVersion, указанных в манифесте и версий браузера Firefox:

При изменении внешних компонент (новый релиз, исправление ошибок и т. д.) новую версию нужно добавлять к имени файла. Например: AddInNative_1_1.so. Это правило не распространяется на расширения для браузеров. Для них должно быть изменено название object.

Обратите внимание, что записи для Google Chrome и Safari под Windows ссылаются на один и тот же установочный пакет.
Показать

Взято с ИТС
11. Serginio 938 26.10.20 17:47 Сейчас в теме
(10)
Ну когда я делал не было нужды в линуксе.
Нужно добавить условную компиляцию и
используя данную статью https://docs.microsoft.com/ru-ru/dotnet/core/tutorials/netcore-hosting
использовать dlopen (в Linux или macOS).

Шаг 1. Поиск и загрузка CoreCLR

Интерфейсы API среды выполнения .NET Core находятся в coreclr.dll (в Windows), в libcoreclr.so (на платформе Linux) или в libcoreclr.dylib (в macOS). Первым шагом для размещения .NET Core является загрузка библиотеки CoreCLR. Некоторые основные приложения проверяют разные пути или используют входные параметры для поиска библиотеки, пока другие могут загрузить ее по заранее определенному пути (рядом с основным приложением, например, или из известного расположения на компьютере).
После обнаружения библиотека загружается с помощью LoadLibraryEx (в Windows) или dlopen (в Linux или macOS).
Ксакеп; +1 Ответить
12. Serginio 938 29.10.20 10:15 Сейчас в теме
(10) Ну здесь уже прошу прощения. Не силен я в С++.
Нужно перекомпилировать с условной компиляцией как в https://github.com/dotnet/samples/blob/master/core/hosting/HostWithHostFxr/­src/NativeHost/nativehost.cpp
Кроме того как в (11) Разный Api для .NET Core в версиях до .NET Core 3.0 и после
Ксакеп; +1 Ответить
Оставьте свое сообщение