OCV bądź OCR

0

Witajcie,

Posiada ktoś może bibliotekę/funkcję/cokolwiek do rozpoznawania tekstu? Docelowo potrzebuję czegoś co dla określonych zmiennych wejściowych (fragment ekranu) odczyta znajdujący się tam tekst i zwróci go w postaci zmiennej tekstowej. Wymagane też rozpoznawanie wcześniej zapisanych kształtów np w formacie jpg czy dowolnym innym.

Wiem, że jest coś takiego jak OpenCV, w dodatku na licencji jeśli mnie pamięć nie myli LGPL, albo Freeware, ale jakoś sobie z tym nie radzę. C/C#/C++ nie znam, a potrzebne mi to zbyt pilnie, żebym zdążyła przyswoić nowy język, a ze znalezionymi implementacjami pod Delphiego sobie nie radzę nawet z instalacją.

Urządzałoby mnie cokolwiek rozpoznającego tekst i kształt z racji tego, że pozwoli mi to na dalszą pracę nad programem, a sam moduł odpowiedzialny za rozpoznawanie mogę sobie w dalszej przyszłości napisać własny, no ale na teraz coś-cokolwiek by się przydało... Dowiedziałam się też od znajomego, że to raptem kilka linijek kodu, ale niestety jest starym szowinistą i nie chciał się podzielić :/

Pomoże ktoś jakkolwiek?

Pozdrawiam.

0

OpenCV możesz używać z poziomu Python'a, będzie Ci łatwiej, polecam.

Co do bibliotek itp. do rozpoznawania tekstu skorzystaj z tesseract'a.

0

Kontrolka ActiveX Wordowski OCR.


Var
doc :IDocument;
Img :IImage;
Layout :ILayout;
begin
Form3.Height:=Form1.Image1.Height+50;
Form3.Width:=Form1.Image1.Width+50;
doc := IDispatch(CreateOleObject('MODI.Document')) as IDocument;
doc.create(ExtractFilePath(ParamStr(0))+'temp\0.bmp' );
doc.OCR(miLANG_POLISH,true,true);
Img := IDispatch(doc.Images[0]) as IImage;
Layout := IDispatch(Img.Layout) as ILayout;
Form3.TextConv.Text:= Layout.Text;
Form3.MiDocView1.Document := doc;
doc.Close(false);
Img := nil;
Layout := nil;
end;
 

X-Software.com.pl

1 użytkowników online, w tym zalogowanych: 0, gości: 1