Имя: Пароль:
1C
 
Файл с результатом распознавания не найден КомпонентаЗагрузкиCuneiForm.РаспознатьКартинку
0 spiller26
 
05.09.18
13:22
Пробую распознать текст с картинки через CuneiForm/
Возвращает "Файл с результатом распознавания на найден"
Файла нет.
Код дернул с документооборота. Проверяю в документообороте.

&НаСервере
Функция РаспознатьФайлНаСервере()
    
    ИмяФайлаСПутем = ПолучитьИмяВременногоФайла("jpg");
    ДвоичныеДанные = ПолучитьИзВременногоХранилища(Объект.КлючФайлаСкан);
    ДвоичныеДанные.Записать(ИмяФайлаСПутем);
    
    ИмяФайлаРезультата = ПолучитьИмяВременногоФайла("txt");

    ПриложениеЗапускаCuneiForm = ПолучитьОбщийМакет("ПриложениеЗапускаCuneiForm");
    ИмяEXEФайла = ПолучитьИмяВременногоФайла("exe");
    ПриложениеЗапускаCuneiForm.Записать(ИмяEXEФайла);
    
    КомпонентаЗагрузкиCuneiForm = Неопределено;
    Попытка
        КодВозврата = ПодключитьВнешнююКомпоненту("ОбщийМакет.КомпонентаЗагрузкиCuneiForm", "CuneiFormLoaderAddIn", ТипВнешнейКомпоненты.Native);
        КомпонентаЗагрузкиCuneiForm = Новый("AddIn.CuneiFormLoaderAddIn.AddInNativeExtension");    
    Исключение
        ОписаниеОшибки = НСтр("ru = 'Не удалось загрузить компоненту загрузки CuneiForm'");
        Возврат "Ошибка";
    КонецПопытки;

    ВремяОжиданияРаспознавания = 30; // секунды
    
    ЯзыкРаспознаванияЧисло = 7;
    
    ПутьКПрограммеКонвертацииPDF = "";
    
    КодВозврата = КомпонентаЗагрузкиCuneiForm.РаспознатьКартинку(ИмяEXEФайла, ИмяФайлаСПутем, ИмяФайлаРезультата,
        ЯзыкРаспознаванияЧисло, ВремяОжиданияРаспознавания, ПутьКПрограммеКонвертацииPDF);
    
    УдалитьФайлы(ИмяФайлаСПутем);
    
    Если КодВозврата = Истина Тогда
        
        Текст = "";
        
        ТекстовыйДокумент = Новый ТекстовыйДокумент;
        ТекстовыйДокумент.Прочитать(ИмяФайлаРезультата); // если в формате TXT
        Текст = ТекстовыйДокумент.ПолучитьТекст();
        
        ПутьКФайлу = ИмяФайлаРезультата;
        РаспознанныйТекст = Текст;
        Возврат "Успешно";
        
    КонецЕсли;    

КонецФункции
Компьютеры — это как велосипед. Только для нашего сознания. Стив Джобс