Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.10.2013, 13:20   #11
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

http://ru.wikipedia.org/wiki/Microso...cument_Imaging
tiff однако нестандартный.

TC, вы FreeGOCR не пробовали в качестве альтернативы?
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 11.10.2013, 13:58   #12
ivt22
Пользователь
 
Регистрация: 23.07.2013
Сообщений: 81
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
MODI инсталлировать нужно
Странно конечно это, у меня же есть Microsoft Open Document Imaging это вроде как и есть MODI. Сейчас попробую из интернета поскачивать и установить его..
ivt22 вне форума Ответить с цитированием
Старый 11.10.2013, 14:02   #13
ivt22
Пользователь
 
Регистрация: 23.07.2013
Сообщений: 81
По умолчанию

Цитата:
Сообщение от raxp Посмотреть сообщение
http://ru.wikipedia.org/wiki/Microso...cument_Imaging
tiff однако нестандартный.

TC, вы FreeGOCR не пробовали в качестве альтернативы?
Дело в том, что я не очень во всем этом разбираюсь, я уже почти до MODI этого докопался. Мне же нужно прогу написать, которая отсылает файл на распознавание и сохраняет распознанный текст в переменную. И разбираться с новой программой у меня нет сил и возможности, поэтому попробую добить MODI
ivt22 вне форума Ответить с цитированием
Старый 11.10.2013, 14:18   #14
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

Код:
var
 modi: olevariant;
 fname: TFileName;   //MDIVWCTL.DLL http://www.microsoft.com/ru-ru/download/confirmation.aspx?id=21581
 i: integer;
 s: string;
begin
 fname:= '1.tif';
 modi:= CreateOLEObject('MODI.Document'); // получить доступ к MODI
 // и далее по идее "пишем" функции MODI
 modi.Create(fname);

 modi.OCR();// распознавание всех страниц, если файл многостраничный
 s:= '';
 for i:= 0 To modi.Images.Count - 1 do // срабатывает на каждой странице
  s:= s+ modi.Images(i).Layout.Text; // помещение результатов работы в строку
 showmessage(s);
 //showmessage(modi.images.item(0).layout.text);
 modi.close;
 modi:= UnAssigned; // MODI нам  более не нужен
end;
====================
Цитата:
разбираться с новой программой у меня нет сил и возможности
"FreeGOCR. Распознавание текста в своих программах"
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation

Последний раз редактировалось raxp; 11.10.2013 в 14:21.
raxp вне форума Ответить с цитированием
Старый 11.10.2013, 14:30   #15
ivt22
Пользователь
 
Регистрация: 23.07.2013
Сообщений: 81
По умолчанию

Цитата:
Сообщение от raxp Посмотреть сообщение
Код:
var
 modi: olevariant;
 fname: TFileName;   //MDIVWCTL.DLL http://www.microsoft.com/ru-ru/download/confirmation.aspx?id=21581
 i: integer;
 s: string;
begin
 fname:= '1.tif';
 modi:= CreateOLEObject('MODI.Document'); // получить доступ к MODI
 // и далее по идее "пишем" функции MODI
 modi.Create(fname);

 modi.OCR();// распознавание всех страниц, если файл многостраничный
 s:= '';
 for i:= 0 To modi.Images.Count - 1 do // срабатывает на каждой странице
  s:= s+ modi.Images(i).Layout.Text; // помещение результатов работы в строку
 showmessage(s);
 //showmessage(modi.images.item(0).layout.text);
 modi.close;
 modi:= UnAssigned; // MODI нам  более не нужен
end;
====================

"FreeGOCR. Распознавание текста в своих программах"

ААААА ЖЕСТЬ, то что ты мне прислал и написал в этом сообщении я месяца 3-4 ищу, я уже все облазил, по этой программе GOCR документацию на русском языке просто нигде нет, откуда ты ее достал? Я даже до аспирантуры универа до кафедры обработки изображений добрался, начал нейронные сети изучать для распознавания изображения, а ты мне взял и все в одном сообщение за одну секунду ляпнул. СПАСИБО ОГРОМНОЕ!!
ivt22 вне форума Ответить с цитированием
Старый 11.10.2013, 14:33   #16
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

Цитата:
GOCR
с русским у нее не все гладко, ее нужно обучать.
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 11.10.2013, 14:35   #17
ivt22
Пользователь
 
Регистрация: 23.07.2013
Сообщений: 81
По умолчанию

последний вопрос? куда надо класть эту MDIVWCTL.DLL?
ivt22 вне форума Ответить с цитированием
Старый 11.10.2013, 14:36   #18
ivt22
Пользователь
 
Регистрация: 23.07.2013
Сообщений: 81
По умолчанию

Цитата:
Сообщение от raxp Посмотреть сообщение
с русским у нее не все гладко, ее нужно обучать.
Мне и не нужен русский. мне нужно только цифры с изображения распознавать. ну и десятичную точку в цифре)
ivt22 вне форума Ответить с цитированием
Старый 11.10.2013, 14:40   #19
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

Цитата:
последний вопрос? куда надо класть эту MDIVWCTL.DLL?
класть ее не надо, ее нужно положить рядом с проектом и зарегистрировать + понадобится MSPGIMME.DLL. Однако похоже, что сам MODI из SharePointDesigner лучше установить, дабы избежать проблем с регистрацией и прочих зависимостей.
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 11.10.2013, 15:03   #20
ivt22
Пользователь
 
Регистрация: 23.07.2013
Сообщений: 81
По умолчанию

установил Sharepoint зарегистрировал MDIVWCTL.DLL вот так - regsvr32 MDIVWCTL.DLL, попытался зарегистрировать MSPGIMME.DLL вылезло окошечко, что это дело не очень похоже на DLL. Затем обе DLL ки скопировал папку с проектом, но все-равно пишет класс не зарегистрирован, а по повторному нажатию на кнопку пишет что Члены группы не найдены.
ivt22 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
вытащить текст из тегов lezgin Общие вопросы Delphi 15 20.01.2013 14:02
вытащить текст с веб страницы patch JavaScript, Ajax 4 01.10.2012 12:19
Как вытащить текст из диаграммы? kta87 Microsoft Office Excel 5 28.08.2012 21:44
вытащить текст из ячейки Tirendus Microsoft Office Excel 18 29.01.2012 19:51
вытащить текст internet explorer_server nbutikov Win Api 5 25.02.2010 21:42