20 лет программирую на 1С и 13 на C#. Давно интегрирую .Net в 1С для расширения возможностей. Вот мои разработки http://catalog.mista.ru/profile/82159/public/
Основные это Использование сборок .NET в 1С 7.x b 8.x и . Динамическая компиляция класса обертки для использования .Net событий в 1С через ДобавитьОбработчик или ОбработкаВнешнегоСобытия
Если в 8.х есть множество возможносей, то для 7.7 функционал очень скуден.
Для 8.x часто испльзуется доступ к Вэб сервисам неподдерживаемыми 1С. Например Ws-протоколы и тд. Можно использовать асинхронные HTTP запросы, multipart/form-data итд.
Использовать Push-уведомления. Есть множество библиотек для разбора HTML (AngleShart, Silenium)
  При  работе с различными EDI есть уже готовые библиотеки на . Net которые можно использовать как в 7.7 так и в 8.x. В общем возможностей для интеграции огромное количество.
Есть опыт программирования для ТСД на WM. Скоро появятся ТСД на Windows mobile 10 где с использованием  UWP и Xamarin для других осей
Знаний много, но на нынешней работе не могу и малую толику возможностей использовать.

Добил поиск метода
http://rsdn.ru/forum/dotnet/6471273.1

Поэкспериментировал с CallBack


[UnmanagedFunctionPointer(CallingConvention.Cdecl)]
         delegate void myDelegate(IntPtr thisptr);

  public static void TestCallBack(IntPtr Str,IntPtr FuncPtr)
        {

            myDelegate fun = Marshal.GetDelegateForFunctionPointer<myDelegate>(FuncPtr);

            fun(Str);

            var str = Marshal.PtrToStringUni(Str);
        }



На С++

typedef void(STDMETHODCALLTYPE *ManagedTestCallBack)(const wchar_t*, void(*) (const wchar_t*));

    typedef void(STDMETHODCALLTYPE *ManagedTestCallBack)(const wchar_t*, void(*) (const wchar_t*));
    
void TestCallBack(const wchar_t* str)
{

    printf_s("Return string %S.\n", str);
}


    ManagedTestCallBack pTestCallBack;
    
    
    hr = CreateDelegate2(pCLRRuntimeHost, domainId, L"CoreClrDLL", L"CoreClrDLL.Program", L"TestCallBack", (INT_PTR*)&pTestCallBack);
        if (FAILED(hr))
        {
            printf_s("Failed to create a delegate to the managed entry point: (%d).\n", hr);
    
        }
        else
        {
            wchar_t* str = L"Test str from unmanaged";
            pTestCallBack(str, TestCallBack);
        }

ManagedTestCallBack pTestCallBack;


hr = CreateDelegate2(pCLRRuntimeHost, domainId, L"CoreClrDLL", L"CoreClrDLL.Program", L"TestCallBack", (INT_PTR*)&pTestCallBack);
    if (FAILED(hr))
    {
        printf_s("Failed to create a delegate to the managed entry point: (%d).\n", hr);

    }
    else
    {
        wchar_t* str = L"Test str from unmanaged";
        pTestCallBack(str, TestCallBack);
    }


Работает. Так что можно память выделять на стороне натива и использовать обратные вызовы.

http://rsdn.ru/forum/dotnet/6471317.1

Сделал маршалинг из _tVariant натива в манагед
http://rsdn.ru/forum/dotnet/6472655.1

пора уж блог заводить, а то на форуме это выгдядит "Тихо сам с собою, я веду беседу" (с)

Я этим просто приподымаю ветку. Может кого и заинтересует.
По мере продвижения выкладваю сюда http://ru.stackoverflow.com/questions/523386/%d0%92%d1%8b%d0%b7%d0%be%d0%b2-%d1%83%d0%bf%d1%80%d0%b0%d0%b2%d0%bb%d1%8f%d0%b5%d0%bc%d0%be%d0%b3%d0%be-%d0%ba%d0%be%d0%b4%d0%b0-net-core-%d0%b8%d0%b7-%d0%bd%d0%b5%d1%83%d0%bf%d1%80%d0%b0%d0%b2%d0%bb%d1%8f%d0%b5%d0%bc%d0%be%d0%b3%d0%be

(509) а чо такое "Элемент + 44"?

(510) Это смещене vt

В общем выхожу на финишную прямую
http://rsdn.ru/forum/dotnet/6478527.1

Наткнулся на то, что двоичные данные нельзя передать.
Может есть обходной путь?

(513) В строку их

(514) Это понятно. Интересно а почему ДД то нельзя?
Получить можно, но передать нет?

Сделал

Перем   Врап,СсылкаНаДомен;
Функция СоздатьОбъектПоСсылке(Ссылка)

рез = Новый("AddIn.NetObjectToNative.NetObjectToNative");
рез.УстановитьСсылку(СсылкаНаДомен,Ссылка);    
возврат  рез
КонецФункции // СоздатьОбъектПоСсылке()


Процедура КнопкаВыполнитьНажатие(Кнопка)
            
СылкаСБ=Врап.Новый("System.Text.StringBuilder","Первая Строка");
//Сообщить(СылкаСБ);

СсылкаCultureInfo=Врап.ПолучитьТип("System.Globalization.CultureInfo");

    СсылкаCultureInfo=Врап.Новый(СсылкаCultureInfo,"es-ES");

//
    СultureInfo=СоздатьОбъектПоСсылке(СсылкаCultureInfo);
    
    СБ=СоздатьОбъектПоСсылке(СылкаСБ);
    Сообщить(СБ.Capacity);
    Сообщить(СБ.ПолучитьСсылку());
    
    СсылкаInvariantCulture=СultureInfo.InvariantCulture;

    // К сожалению 1С вызывает метод имеющий возвращаемое значение как функцию даже если вызов идет как процедура
    //Нужно очистить ссылку в списке объектов
    ссылка=Сб.Append("Новая Строка"); Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.AppendLine();   Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.Append("Вторая Строка"); Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.AppendLine();     Врап.ОчиститьСсылку(ссылка);

    ссылка=Сб.AppendFormat("AppendFormat {0}, {1}, {2}, {3}, {4},", "Строка", 21, 45.89, ТекущаяДата(),истина );   Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.AppendLine(); Врап.ОчиститьСсылку(ссылка);

    // Так как в параметрах можно передавать только простые типы закодирум ссылку на объект в строку
    ссылка=Сб.AppendFormat(СсылкаCultureInfo,"AppendFormat {0}, {1}, {2}, {3}, {4},", "Строка", 21, 45.89, ТекущаяДата(),истина );  Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.AppendLine(); Врап.ОчиститьСсылку(ссылка);

    ссылка=Сб.AppendFormat(СсылкаInvariantCulture,"AppendFormat {0}, {1}, {2}, {3}, {4},", "Строка", 21, 45.89, ТекущаяДата(),истина );
    Врап.ОчиститьСсылку(СсылкаInvariantCulture);





    Сообщить(СБ.ToString());
    СБ.Capacity=40;
    Сообщить(СБ.Capacity);

    // Очистка ссылок СБ и  СultureInfo осуществляется внутри ВК
    КонецПроцедуры

Процедура ПриОткрытии()


ИмяФайла="d:\MyPrograms\VNCOMP83\AddInNetObjectToNative\AddInNetObjectToNative\Debug\AddInNetObjectToNative.dll";

    ПодключитьВнешнююКомпоненту(ИмяФайла, "NetObjectToNative",ТипВнешнейКомпоненты.Native);
    Врап = Новый("AddIn.NetObjectToNative.LoaderCLR");
    CoreClrDir="c:\Program Files\DNX\runtimes\dnx-coreclr-win-x86.1.0.0-rc1-update1\bin\";
    ДиректорияNetObjectToNative="d:\MyPrograms\VNCOMP83\NetObjectToNative\NetObjectToNative\bin\Debug\";
    
    СсылкаНаДомен=Врап.СоздатьОбертку(CoreClrDir,ДиректорияNetObjectToNative,"");
    
КонецПроцедуры

Модераторам. Можно код выделить?

Пока сделал для Win. Допилю еще вызовы методов расширений. Вызов дженериков определяемых по типу.

Но по моему никому это не надо. А жалко.
Под линукс проще писать расширения будет.

Чуть позже наришу статью и выложу исходники

Я себе сделал типа такое и мне хватает.

Прог = " //
|public static class AddinHelloClass
|{
|    public static int AddinМойМетод(ref string s)
|    {
|        s = ""hello"";
|        return 100500;
|    }           
|}";

Шарп.ДобавитьМодуль(Прог);
Шарп.Компилировать();    
стр = "раз два три";
ч =Шарп.МойМетод(стр);
Сообщить(стр);
Сообщить(ч);

т.е. тупо готовую программу в виде текста компилирую и когда надо выполняю. без всяких глазоломательных оберток. текст модулей можно хранить в БД, в макетах или файлах.

(518) Давно на это и намекал )) и не надо больше никаких извратов.

Точнее параметры туда и результаты оттуда еще как то и все.

(519) ВК NativeAPI и классик и чтобы под linux на mono тоже работало на сервере
И на ИС продавать поддержку или наборы готовых "текстов программы"

(520) ну результаты оттуда идут нормально. сделаю на досуге чтобы можно было из шарпа внешнее событие вызывать. больше особо ничего и не требуется.

(519) А как события прикручивать?

Ну если ты видел у меня этот подход много где используется.
В том числе и Scripting API

(523) "у меня этот подход много где используется" ну и правильно. больше ничего и не надо, имхо.

(523) Да у тебя получается мощнее не просто вызов стороннего кода из 1С, а полноценное взаимодействие с этим кодом.
По сути система получается из 2 языков одновременно работающих 1С и .Net

(523) события сделаю. там ничего сложного не вижу. только нужно решить как удобнее сделать.

(525)+ А в (518) работает только по очереди или 1С или .Net

523+ Динамическая компиляция для использования .Net событий в 1С
.Net в 1С. Парсинг сайтов, multipart/form-data, gzip итд

(526) Так у меня это все есть.
Да и суть то новой компонеты в том, что это работает без COM и может работать на Линкусе.

(529) ну у меня тоже Native API. На счет Линукса не знаю, может и на Линуксе работает. :)
Но писать как в (516) вы меня не заставите. Я лучше напишу и отлажу в VS, а потом скопипастю в 1С.

(530)  Ну я никого не заставляю.

Проблемы в архитектуре ВК
1. Вызов метода как процедуры должен и вызвать метод CallAsProc
2. Добавить возможность передавать в параметрах ВК и возвращать ВК что бы обойтись без ссылок.
А так по линуксом это значительно проще  чем писать отдельно ВК

(526) Смотри Динамическая компиляция для использования .Net событий в 1С

Кстати в примере ошибка прокралась
СылкаСБ=Врап.Новый("System.Text.StringBuilder","Первая Строка");
//Сообщить(СылкаСБ);

СсылкаCultureInfo=Врап.ПолучитьТип("System.Globalization.CultureInfo");

    СсылкаCultureInfo=Врап.Новый(СсылкаCultureInfo,"es-ES");
// Здесь уже СсылкаCultureInfo указывает на объект

//
    СultureInfo=СоздатьОбъектПоСсылке(СсылкаCultureInfo);

И СultureInfo это не тип а объект СсылкаCultureInfo,"es-ES");  

  
// Вызываем статический метод    
    СсылкаInvariantCulture=СultureInfo.InvariantCulture;

он проходит, так как нет проверки на статик.

Я думаю так и оставить. Можно из объекта как в Delphi вызывать и методы объекта и статические

(533) <Врап.Новый(СсылкаCultureInfo,"es-ES"); >

Hablo espanol?

+тьфу habla espanol?

Наверное взял из примера

es-ES

Испанский (Испания)

Международная: 0x00000C0A

Традиционные: 0x0000040A

(532) и чо там смотреть? опять 8 листов русско-турецкого кода на который я смотреть не могу. а что мне нужно я и так знаю.

(531) "Вызов метода как процедуры должен и вызвать метод CallAsProc"

ты хочешь сказать, что 1с не вызывает CallAsProc?
у меня вызывает вроде.

(538) Вызывает если HasRetVal возвращает ложь.

Но например если я вызываю
Сб.AppendLine(); // А у него есть возвращаемое значение this

То даже если метод возвращает значение нужно вызывать
CallAsProc

Тогда не нужно оборачивать результат.

(539) ну это так и должно быть. как говорил один мой шеф: "если решение некрасивое, то оно обычно и неправильное" :)

(540) Даже неправильные решения могут быть востребованными и хорошо оплачиваемыми.

(541) это ты намекаешь на сборнуюю РФ по футболу?

СсылкаCultureInfo=Врап.ПолучитьТип("System.Globalization.CultureInfo");

Вот автор, например, предлагает после каждой выпитой рюмки, ездить в гараж на электричке за соленым огурцом, а я предлагаю съездить в гараж, привезти банку огурцов и сидеть спокойно выпивать и закусывать. Какой метод правильный? Я думаю мой.

Правильны это тот который удобный.
Еще раз у меня используется Scripting Api из Каропки. При этом я могу передавать любые объекты. В том числе и объекты 1С.
Могу пользоваться IronPithon. Только это не относится к теме. А именно кросплатформенная ВК использования классов .Net в 1С.

А твой метод использует Hosting API?

(543) Чуть позже сделаю загрузку классов из сторонних сторонних сборок.

(543) Твой метод реализует процедурный подход. А метод автора объектный. Ты можешь сохранить объект дот нета допустим в реквизит формы и повторно его использовать в течении жизни формы?

(543) На самом деле я начал использовать классы .Net для использования Вэб сервисов неподдерживаемых 1С с кучей классов которые используют данные 1С и записываются. Все построено на классах. Так вот выбор был делать ручную обертку или автоматическу. Твой подход с кимпиляцией текста не подходит. Нужно сериализовывать объекты десериализовывать. Для передачи в методахь и возврата. Это частный подход который используется как при компиляции событий, так и для заполнения данных 1С так и для получения делегатов

(543) Для упрощения получения объектов можно создать методы

Функция Ъ(Ссылка)
    рез = Новый("AddIn.NetObjectToNative.NetObjectToNative");
    рез.УстановитьСсылку(СсылкаНаДомен,Ссылка);    
    возврат  рез
КонецФункции // СоздатьОбъектПоСсылке()
Функция ъНовый(стр)
    возврат ъ(Врап.Новый(стр));
КонецФункции

Функция ъТип(стр)
      возврат ъ(Врап.ПолучитьТип(стр));
КонецФункции

Процедура ТестСокпВызоваНажатие(Элемент)
    // Вставить содержимое обработчика.
    СБ=ъНовый("System.Text.StringBuilder");
    CultureInfo=ъТип("System.Globalization.CultureInfo");
    CultureInfoES=ъ(Врап.Новый(CultureInfo.ПолучитьСсылку(),"es-ES"));
    Сообщить(CultureInfoES.ПолучитьСсылку());

    
    Сообщить(СБ.Capacity);
    Сообщить(СБ.ПолучитьСсылку());
    
   InvariantCulture=ъ(CultureInfo.InvariantCulture);
   ссылка= InvariantCulture.ПолучитьСсылку();

    // К сожалению 1С вызывает метод имеющий возвращаемое значение как функцию даже если вызов идет как процедура
    //Нужно очистить ссылку в списке объектов
    ссылка=Сб.Append("Новая Строка"); Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.AppendLine();   Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.Append("Вторая Строка"); Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.AppendLine();     Врап.ОчиститьСсылку(ссылка);
    
    ссылка=Сб.AppendFormat("AppendFormat {0}, {1}, {2}, {3}, {4},", "Строка", 21, 45.89, ТекущаяДата(),истина );   Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.AppendLine(); Врап.ОчиститьСсылку(ссылка);

    // Так как в параметрах можно передавать только простые типы закодирум ссылку на объект в строку
    
    ссылка=Сб.AppendFormat(InvariantCulture.ПолучитьСсылку(),"AppendFormat {0}, {1}, {2}, {3}, {4},", "Строка", 21, 45.89, ТекущаяДата(),истина );  Врап.ОчиститьСсылку(ссылка);
    ссылка=Сб.AppendLine(); Врап.ОчиститьСсылку(ссылка);
    
    ссылка=Сб.AppendFormat(CultureInfoES.ПолучитьСсылку(),"AppendFormat {0}, {1}, {2}, {3}, {4},", "Строка", 21, 45.89, ТекущаяДата(),истина );
  
    
    
    Сообщить(СБ.ToString());
    СБ.Capacity=40;
    Сообщить(СБ.Capacity);

КонецПроцедуры

(518) Я дика извиняюсь, это реальность или фантастика ?

(0) Если помнишь, я тебе давно надоедал насчет
врап=новый COMОбъект("NetObjectToIDispatch45");
в 1с 7.7 ?

Теперь я взялся за ум и перешел на 8.3.

И у меня вопрос, есть ли что-то новое по этой теме  для 8?

(549) это даже проще даже без вк можно

без ВК любой Д сможет

(552) Не в этом смысла, динамическая компиляция .net можно через запись файлика и выполнение командасистемы или выполнить

(553) в виде примера можно ?

(554) http://bbs.vbstreets.ru/viewtopic.php?f=2&t=44609

(549) Смотри 528.

(551) можно и без ВК, только данные через файлы передавать и внешнее событие никак не вызвать.

(548) "Для упрощения получения объектов можно создать методы"
да у меня претензии к скорости выполнения такого кода и сложности разработки. Я то один раз в VS все напишу и с отладчиком, в нормальной IDE все отлажу, а тебе приходится русско-буржуйскую кашу ковырять прямо в 1С. Это же муторно и некрасиво.

А про передачу объектов 1с в ВК я так и не понял. Оно у тебя работает или нет?

(549) я думаю, лет 8 уже как не фантастика.

(556) напомни, все еще  нужно что-то регистрировать в винде 2008R2 чтобы заюзать твою обертку в 8.3 ?

(559) Да. Вот пример с подгрузкой сборок.

HttpClient=ъТип("System.Net.Http.HttpClient, System.Net.Http, Version=4.0.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a");
HttpClientHandler = ъТип("System.Net.Http.HttpClientHandler, System.Net.Http, Version=4.0.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a");
DecompressionMethods= ъТип("System.Net.DecompressionMethods, System.Net.Primitives, Version=4.0.11.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a");


handler = ъНовый(HttpClientHandler.ПолучитьСсылку());
// Можно использовать и так. Только Не соберем ссылки
//handler.AutomaticDecompression=Врап.OR(DecompressionMethods.GZip,DecompressionMethods.Deflate);

ссылкаGZip=DecompressionMethods.GZip;
ссылкаDeflate=DecompressionMethods.Deflate;

handler.AutomaticDecompression=Врап.OR(ссылкаGZip,ссылкаDeflate);
Врап.ОчиститьСсылку(ссылкаGZip);   Врап.ОчиститьСсылку(ссылкаDeflate);

Клиент = ъ(Врап.Новый(HttpClient.ПолучитьСсылку(),handler.ПолучитьСсылку()));

uriSources ="https://msdn.microsoft.com/en-us/library/system.net.decompressionmethods(v=vs.110).aspx";;

Стр=ъ(Клиент.GetStringAsync(uriSources)).Result;
Сообщить(СтрДлина(стр));

(560 Инструкция в шапке Использование классов .Net в 1С для новичков

кроме того рядом с NetObjetToIDispatch45.dll лежит RegAsm.bat который нужно запустить от имени администратора

(558) У меня разные подходы. В том числе и твой. Я например заполняю ТаблицуЗначений внутри .Net класса. Могу использовать DLL, могу DynamicMethod.
На самом деле, я легко пишу как ты говоришь мешанину и на 1С. Её проще править и отлаживать. Внутри 1С. Еще раз повторю у тебя очень частный случай возможностей моей компоненты. Но она мощнее так как позволяет использовать объекты, в том числе и 1С. Использование событий .Net объектов. Асинхронное программирование.

Но это опять не по теме. Сейчас я говорю о кроссплатформенном использовании классов .Net в 1С.

(563) "Я например заполняю ТаблицуЗначений внутри .Net класса"
Такое в NativeAPI возможно? Я от не понимаю как ты это делаешь. Пример есть? Только не надо вываливать листинг на 150 строк :)

(564) В NativeAPI нет. А в COM легко.
Но на самом деле можно и через Native. Но только на Виндовс.
Обернуть любой объект через СОМ объекта у которого запросить Long на себя, который можно передавать в параметрах и вызывать на нем методы IDispatch.

(565) подскажи почему не присваивается значение структуре ?
newid = Врап.ПолучитьТип("System.Guid").NewGuid().ToString();
ТипRequest = Врап.ПолучитьТип("ServiceEfactura.ServiceReference.InvoicesRequest");
ТипЛист = Врап.ПолучитьТип("System.Collections.Generic.List`1");
ТипInvoiceIndentificator = Врап.ПолучитьТип("ServiceEfactura.ServiceReference.InvoiceIndentificator");
    
Request = Врап.СоздатьОбъект(ТипRequest);
ТипЛистОбъект = Врап.ТипКакОбъект(ТипЛист);
ТипизированныйЛист = ТипЛистОбъект.MakeGenericType(ТипInvoiceIndentificator);
SeriaAndNumbers = Врап.СоздатьОбъект(ТипизированныйЛист);
SeriaAndNumber = Врап.СоздатьОбъект(ТипInvoiceIndentificator);
SeriaAndNumber.Number = "000000001";
SeriaAndNumber.Seria = "EAA";
SeriaAndNumbers.Add(SeriaAndNumber);
    
request.RequestId = newid; // тут нормально присваивается
А тут затык, так как это массив.
request.SeriaAndNumbers = SeriaAndNumbers;
пишет ошибка в методе SeriaAndNumbers  не найден метод *.*.*.*.SeriaAndNumbers.mscorlib

Нужно смотреть тип ServiceEfactura.ServiceReference.InvoiceIndentificator

Заведи отдельную ветку.

Возможно у тебя тип request.SeriaAndNumbers
ServiceEfactura.ServiceReference.InvoiceIndentificator[]

Тогда
request.SeriaAndNumbers = SeriaAndNumbers.ToArray();

да, спс, таки оно.

Поработал с интерфейсами и Энумераторами

Функция ПолучитьЭнумератор(Объект)

Перечислимый=ъ(Врап.ПолучитьИнтерфейс(Объект.ПолучитьСсылку(),"IEnumerable"));
ПеречислительСсылка=Перечислимый.GetEnumerator();
// На всякий случай приведем к Интерфейсу IEnumerator
Перечислитель=ъ(Врап.ПолучитьИнтерфейс(ПеречислительСсылка,"IEnumerator"));
Врап.ОчиститьСсылку(ПеречислительСсылка);    
// Можно и так
//IEnumerable=ъТип("System.Collections.IEnumerable");
//IEnumerator=ъТип("System.Collections.IEnumerator")
// Перечислимый=ъ(Врап.ПолучитьИнтерфейс(Объект.ПолучитьСсылку(),IEnumerable));
//ПеречислительСсылка=Перечислимый.GetEnumerator();
// На всякий случай приведем к Интерфейсу IEnumerator
// Перечислитель=ъ(Врап.ПолучитьИнтерфейс(ПеречислительСсылка,IEnumerator));
//Врап.ОчиститьСсылку(ПеречислительСсылка);    

возврат  Перечислитель
КонецФункции // ПолучитьЭнумератор()

Процедура ТестЭнумератораНажатие(Элемент)
    List=ъТип("System.Collections.Generic.List`1[System.String]");
//Сообщить(Врап.ИнформацияОТипе(List.ПолучитьСсылку()));    

//IEnumerable=ъТип("System.Collections.IEnumerable");
//IEnumerator=ъТип("System.Collections.IEnumerator");

Список=ъНовый(List.ПолучитьСсылку());
Для сч=1 По 10 Цикл
Список.Add(строка(сч));    
КонецЦикла;

// Нет поддержки энумераторов. В COM есть
//Для каждого стр   Из Список Цикл

//Сообщить(стр);    

//КонецЦикла;

СписокЭнум=ПолучитьЭнумератор(Список);
  
Пока СписокЭнум.MoveNext() Цикл
//  Врап.ВСтроку вывоит строковое представление всех типов в том числе числовые, строки, неопределено
    Сообщить(СписокЭнум.Current);

КонецЦикла;

КонецПроцедуры

Протестировал out параметры
TryGetValue(ключ, out значение))

Процедура TestDictionaryНажатие(Элемент)
    // Вставить содержимое обработчика.
Словарь= ъНовый("System.Collections.Generic.Dictionary`2[System.String,System.Int32]");

Для сч=1 По 10 Цикл
  Словарь.Add(строка(сч),сч);    
КонецЦикла;

зн=0;
Если Словарь.TryGetValue("5",зн) Тогда
  Сообщить(зн);
КонецЕсли;

КонецПроцедуры

Проверил производительность
http://rsdn.ru/forum/dotnet/6484358.1

миллион вызовов функции .Net занимает порядка 3 секунд, на моем не можном компе.

А вот в 1С
    // Вставить содержимое обработчика.
    КоличествоИтераций=20000;
Тестовый=ъТип("TestDllForCoreClr.Тестовый, TestDllForCoreClr, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null");
Тест=ъ(Врап.Новый(Тестовый.ПолучитьСсылку()," Свойство из Конструктора"));

    stopWatch = ъНовый("System.Diagnostics.Stopwatch,System.Runtime.Extensions, Version=4.0.11.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a");
    
    стр="";
     Тест.ПолучитьЧисло(1);
    
    НачВремя=ТекущаяДата();
    stopWatch.Start();
    
    
    Для сч=1 по КоличествоИтераций Цикл
        Тест.ПолучитьЧисло(сч);

    КонецЦикла;
    
    stopWatch.Stop();
    
    ВремяВыполнения=ТекущаяДата()-НачВремя;
    Сообщить("ПолучитьЧисло ="+ВремяВыполнения);
    ВывестиВремя(stopWatch);

1 секунда на 20 000 вызовов .
против
1 секунда на 300 000.

Да еще зачем то хочет установить свойство Elapsed
Хотя никакой установки нет

Процедура ВывестиВремя(знач stopWatch)
     ts = ъ(stopWatch.Elapsed);

    String=ъТип("System.String");
    // Format and display the TimeSpan value.
     Hours=ts.Hours;
     Minutes=ts.Minutes;
     Milliseconds=ts.Milliseconds;
     Seconds=ts.Seconds;
    elapsedTime = String.Format("{0:00}:{1:00}:{2:00}.{3:00}",Hours, Minutes, Seconds,Milliseconds / 10);
    Сообщить(elapsedTime);
КонецПроцедуры

(0) вчера студент приходил, вебсервис синтезатора речи Ivona испытывали.
как с помощью врапера его к 1с прикрутить?

ниже работающий пример на С#:

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Net;
using System.Security.Cryptography;
using System.Text;
using System.Web.Script.Serialization;
using System.Runtime.InteropServices;


class Program
{
    const string AccessKey = "GDNAJP73IAROH72QWEHA";
    const string SecretKey = "9Q7vSMMvVbMw8t9Ti5HRTSWde1E4cah9N9DV8pG7";

    [DllImport("winmm.dll")]
    private static extern long mciSendString(string strCommand, StringBuilder strReturn, int iReturnLength, IntPtr hwndCallback);

    static void Main()
    {
        string errortext = "";

        try
        {
            var path = System.Environment.GetFolderPath(System.Environment.SpecialFolder.ApplicationData) + "1.mp3";
            File.Delete(path);

            byte[] voice = IvonaCreateSpeech("Привет, красавчики!");
            File.WriteAllBytes(path, voice);

            string command = "play " + path + " wait ";
            mciSendString(command, null, 0, IntPtr.Zero);

            File.Delete(path);

            return;
        }
        catch (WebException ex)
        {
            errortext = ex.Message;
        }
        catch (Exception ex)
        {
            errortext = ex.Message;
        }
        Console.WriteLine(errortext);
    }

    //-----------------------------------------------------------------------------
    //-----------------------------------------------------------------------------

    private static byte[] IvonaCreateSpeech(string text)
    {
        var date = DateTime.UtcNow;

        const string algorithm = "AWS4-HMAC-SHA256";
        const string regionName = "eu-west-1";
        const string serviceName = "tts";
        const string method = "POST";
        const string canonicalUri = "/CreateSpeech";
        const string canonicalQueryString = "";
        const string contentType = "application/json";

        const string host = serviceName + "." + regionName + ".ivonacloud.com";

        var obj = new
        {
            Input = new
            {
                Data = text,
                Type = "text/plain"
            },
            OutputFormat = new
            {
                Codec = "MP3",
                SampleRate = 22050
            },
            Parameters = new
            {
                Rate = "medium",
                Volume = "medium",
                SentenceBreak = 500,
                ParagraphBreak = 800
            },
            Voice = new
            {
                Name = "Tatyana",
                Language = "ru-RU",
                Gender = "Female"
            }
        };
        var requestPayload = new JavaScriptSerializer().Serialize(obj);

        var hashedRequestPayload = HexEncode(Hash(ToBytes(requestPayload)));

        var dateStamp = date.ToString("yyyyMMdd");
        var requestDate = date.ToString("yyyyMMddTHHmmss") + "Z";
        var credentialScope = string.Format("{0}/{1}/{2}/aws4_request", dateStamp, regionName, serviceName);

        var headers = new SortedDictionary<string, string>
            {
                {"content-type", contentType},
                {"host", host},
                {"x-amz-date", requestDate}
            };

        string canonicalHeaders =
            string.Join("\n", headers.Select(x => x.Key.ToLowerInvariant() + ":" + x.Value.Trim())) + "\n";
        const string signedHeaders = "content-type;host;x-amz-date";

        var canonicalRequest = method + '\n' + canonicalUri + '\n' + canonicalQueryString +
                               '\n' + canonicalHeaders + '\n' + signedHeaders + '\n' + hashedRequestPayload;

        var hashedCanonicalRequest = HexEncode(Hash(ToBytes(canonicalRequest)));

        var stringToSign = string.Format("{0}\n{1}\n{2}\n{3}", algorithm, requestDate, credentialScope,
            hashedCanonicalRequest);

        byte[] signingKey = GetSignatureKey(SecretKey, dateStamp, regionName, serviceName);

        var signature = HexEncode(HmacSha256(stringToSign, signingKey));

        var authorization =
            string.Format("{0} Credential={1}/{2}/{3}/{4}/aws4_request, SignedHeaders={5}, Signature={6}",
                algorithm, AccessKey, dateStamp, regionName, serviceName, signedHeaders, signature);

        // Send the request

        var webRequest = WebRequest.Create("https://"; + host + canonicalUri);

        byte[] buffer = ToBytes(requestPayload);

        webRequest.Method = method;
        webRequest.Timeout = 20000;
        webRequest.ContentType = contentType;
        webRequest.Headers.Add("X-Amz-date", requestDate);
        webRequest.Headers.Add("Authorization", authorization);
        webRequest.Headers.Add("x-amz-content-sha256", hashedRequestPayload);
        webRequest.ContentLength = buffer.Length;

        using (Stream newStream = webRequest.GetRequestStream())
        {
            newStream.Write(buffer, 0, buffer.Length);
            newStream.Flush();
        }

        var response = (HttpWebResponse)webRequest.GetResponse();

        using (Stream responseStream = response.GetResponseStream())
        {
            if (responseStream != null)
            {
                using (var memoryStream = new MemoryStream())
                {
                    responseStream.CopyTo(memoryStream);
                    return memoryStream.ToArray();
                }
            }
        }
        return new byte[0];
    }

    private static byte[] GetSignatureKey(String key, String dateStamp, String regionName, String serviceName)
    {
        byte[] kDate = HmacSha256(dateStamp, ToBytes("AWS4" + key));
        byte[] kRegion = HmacSha256(regionName, kDate);
        byte[] kService = HmacSha256(serviceName, kRegion);
        return HmacSha256("aws4_request", kService);
    }

    private static byte[] ToBytes(string str)
    {
        return Encoding.UTF8.GetBytes(str);
    }

    private static string HexEncode(byte[] bytes)
    {
        return BitConverter.ToString(bytes).Replace("-", string.Empty).ToLowerInvariant();
    }

    private static byte[] Hash(byte[] bytes)
    {
        return SHA256.Create().ComputeHash(bytes);
    }

    private static byte[] HmacSha256(String data, byte[] key)
    {
        return new HMACSHA256(key).ComputeHash(ToBytes(data));
    }
}

И? Нужно каждую сборку регистрировать. Кроме того если нужно подправить на сервере например нужно сервер останавливать, так как DLL не выгружается.
Используй HTTPClient
там есть расширение PostAsJsonAsync.
И зачем мусорить ветку. Я прекрасно все знаю.

Я это и на 1С прекрасно напишу. Без всяких DLL и регистрации.

(576) я думал ты себе в портфолио запишешь. типа вот 1с человеческим голосом заговорила.
(577) не. на 1с не получится. там какие то хеши, массивы...

(576) "так как DLL не выгружается" кстати проблема. NET вк не выгружаются сами, хоть тресни, а обычные выгружаются.

(578) Легко. Вот код для 7 ки
Функция ВычислитьHMAC(key,стр)
    врап=СоздатьОбъект("NetObjectToIDispatch45");
    врап.УстЭтоСемерка();
//    если только латиница
//encoding=Врап.ПолучитьТип("System.Text.Encoding").ASCII;
encoding=Врап.ПолучитьТип("System.Text.Encoding").UTF8;

keyByte = encoding.GetBytes(key);

hmacmd5 = Врап.СоздатьОбъект("System.Security.Cryptography.HMACMD5",keyByte);
hmacsha1 = Врап.СоздатьОбъект("System.Security.Cryptography.HMACSHA1",keyByte);

messageBytes = encoding.GetBytes(стр);
hashmessage = hmacmd5.ComputeHash(messageBytes);
hashmessage2 = hmacsha1.ComputeHash(messageBytes);
BitConverter=Врап.ПолучитьТип("System.BitConverter");
Strhashmessage=СтрЗаменить(BitConverter.ToString(hashmessage),"-","");
Strhashmessage2=СтрЗаменить(BitConverter.ToString(hashmessage2),"-","");

Сообщить(Strhashmessage);
Сообщить(Strhashmessage2);
    

КонецФункции// ВычислитьHMAC()

Почему в этой ветке нет подсветки кода?

(581) Подсветка работает только в разделе 1с. Ибо нефиг

(580) это всё вместо двух строчек? ого.

    private static byte[] HmacSha256(String data, byte[] key)
    {
        return new HMACSHA256(key).ComputeHash(ToBytes(data));
    }

(582) То есть в поиске работы кода не может быть?
(579) На 1С можно все. В том числе и выполнение асинхронных методов, подключение к событиям.

И все это возможно и на Линукс. Тут все кричали .Net отстой он не кросплатформен. Я даю кроссплатформенный вариант.
Который может выполняться и на Линукс

(584) Там тоже 2 строчки только алгоритмы разные

hmacsha1 = Врап.СоздатьОбъект("System.Security.Cryptography.HMACSHA1",keyByte);
hashmessage2 = hmacsha1.ComputeHash(messageBytes);

Или
Врап.СоздатьОбъект("System.Security.Cryptography.HMACSHA1",keyByte).ComputeHash(messageBytes);

(585) о. так гораздо лучше

(583) И еще раз как это относится к Linux?
Я показываю кроссплатформенный код. Который можно улучшить если 1С предпримет шаги для оптимизации своей Native ВК или введения новой более оптимальной версии.

Или можно так
ъНовый("System.Security.Cryptography.HMACSHA1",keyByte).ComputeHash(messageBytes);

(587) Если бы 1с "предпринимала шаги", мы бы ещё долго и счастливо сидели на 77

(587) "И еще раз как это относится к Linux?"
да никак. я про линукс и не заикался.

(589) Дело в том, что Native ВК они сделали. Но уже сейчас много недостатков.
1. Нельзя передать или возвратить объект ВК
2. Метод имеющий возвращаемое значение вызывается как функция не зависимо от тог как вызывается метод. Даже когда он вызывается как процедура ВК требует возвращаемое значение.
3. При возврате bool SetPropVal(const long lPropNum, tVariant* varPropVal) и GetPropVal при возврате ложь исключение не вызывается
4. Зачем то происходит установка свойств там где этого в коде нет. И вызываются по некольку раз.

(590) А вся это ветка посвящена Кроссплатформенному использованию классов .Net в 1С.

(592) так а я как узнаю, что она посвящена там чему то. написано "Неспешно ищу работу. 1С + .Net"
С названием, кстати, не согласен. Нет такой отрасли народного хозяйства "1С + .Net". Хотя, если цель - создать такую отрасль из голого пальца, то пожалуйста.

(593) Дело в том, что 1С может использовать кроссплатформенность .Net на прямую. Можно для определенных типов прописать рускоязычные ресурсы. Это легко сделать.
Например в Microsoft Dynamics AX есть ClrObject.
И 1С ничем не хуже. При этом если в .Net практически ничего не ломается, то 1С постоянно косячит JOB: HTTPСоединение и SSL connect error

И поверь если бы 1С ввела поддержку .Net все прекрасно писали бы используя классы .Net так как из каропки.

А интегрировать на самом деле много. Ко мне сейчас много обращаются, а у меня вот времени нет совсем.

(594) <При этом если в .Net практически ничего не ломается, то 1С постоянно косячит JOB: HTTPСоединение и SSL connect error>

Ну ненадо, когда начинаются нюансы с алгоритмами шифрования, требованиями FIPS и т.п. всякие глюи и у явы и у .net и вообще с пустого места начинают выползать

(595) Ну размер библиотек 1С и .Net несопоставим. А вот твой пример касается нового.
Но аналоги HTTPСоединения никогда не ломались, хотя и значительно мощнее. Помню вэб сервисы слетели и пришлось ждать обновления. Ну и по мелочи там сям.

И каксается я так понимаю, что нет поддержки на уровне ОС
https://msdn.microsoft.com/ru-ru/library/aa738624(v=vs.110).aspx

Кстати .Net Core релизнули. А Samsung подтвердил поддержку
https://blogs.msdn.microsoft.com/dotnet/2016/06/27/announcing-net-core-1-0/

Samsung присоединяется к .NET Foundation

Повышенный интерес к .NET Ядро также приводится к более глубокому взаимодействию в .NET Foundation , которая в настоящее время управляет более чем 60 проектов.  Сегодня мы объявляя Samsung в качестве нового члена .  В апреле Red Hat, Мозги Jet и Единство приветствовали Руководящей группы технического .NET Foundation.

".NET Является отличным технология , которая значительно повышает производительность труда разработчиков. Samsung вносит свой ??вклад в .NET Ядро на GitHub - особенно в области поддержки ARM - и мы с нетерпением ожидаем дальнейшего содействия в .NET сообщества с открытым исходным кодом. Samsung рада присоединиться к технической руководящей группы .NET Foundation и помочь большему количеству разработчиков пользоваться преимуществами .NET. "Хонг-Сек Ким, вице - президент Samsung Electronics.

Вклады от Samsung были впечатляющими.  У них есть отличная команда разработчиков, которые проявили интерес к .NET Core.  Мы рады иметь их как часть большой команды

(575) Кстати давно делал. Есть COM класс
glSpeechApi = Новый COMОбъект("SAPI.SpVoice");
        Для каждого звук из glSpeechApi.GetVoices() Цикл
            Сообщить(Звук.ID);
            Если Найти(Звук.ID,"Alyona22k")>0 Тогда
                glSpeechApi.voice=Звук;
                КонецЕсли;
            КонецЦикла;
и вызов
glSpeechApi.Speak(стр);

Выложил статью и исходники
https://habrahabr.ru/post/304482/

Выложил статью с исходниками Разработка ? Кроссплатформенное использование классов .Net в 1С через Native ВК. Или замена COM на Linux

https://habrahabr.ru/post/304542/

Помощь нужна в настроике саита на Битрикс. платно. Сам я не шарю от сова совсем

Проблема такая. Связь с 1С у саита есть. Товар выгружается в инфоблок-элементы, но в каталог-товары не выгружается, хотя раньше се работало. И соответстенно на саите товары не появляются.
Обратился к одному программисту с заданием настроить накопительные скидки, в итоге произошел какои-то сбои, человек слинял и на звонки не отечает. Другои программист по саитам два дня уже не может ничего сделать. Честно говоря устал уже бороться. Услуги оказывают некачественно, обманывают и просто разводят на бабло.

Помогите настроить ради Бога, уже руки опускаются  и плкать хочется. С саитом уже третии месяц вожусь и все никак не могу добиться результатов ни от кого. Оплачу работу,

(602) Это не ко мне. Я битриксом не занимаюсь. Да и атеист .
Сделай сдельный топик. Сюда все равно мало кто заглядывает.

(602) Судя по уровню твоей грамотности мой опыт подсказывает, что ты нам вешаешь лапшу на уши.