Textract (Screen OCR) UDF

[seangriffin]

This UDF provides text capturing support for applications and controls using Textract - an OCR Screen Text Capture Library for Windows 95/98/ME/NT/2000/XP.

This is an alternative to using the Microsoft Office Document Imaging library that comes with Office 2003 and higher.

At the time of writing this UDF, Textract is available on a free 40 day trial, with a purchase price of $219US for 1 copy.

REQUIREMENTS:

• AutoIt3 3.2 or higher
• Textract 2.9 or above

INSTALLATION:

To install the Textract trial:

• Open the web page http://www.structurise.com/textra.exe.
• Save the file to your computer and run it (ie. c:\textra.exe).
• Follow the installation instructions.

LIST OF FUNCTIONS:

_TextractCapture($win_title, $win_text = "", $ctrl_id = "", $delimiter = "", $expand = 1, $scrolling = 1, $cleanup = 1)

_TextractFind($win_title, $win_text = "", $ctrl_id = "", $find_str = "", $partial = 1, $delimiter = "", $expand = 1, $scrolling = 1, $cleanup = 1)

DEMONSTRATION:

<Under Construction>

EXAMPLES:

_TextractCapture.au3_TextractFind.au3

DOWNLOAD:

Latest Version - v0.2 (12/02/09)

Textract.au3

Edited May 21, 2010 by seangriffin

[Innovative]

Are you afraid that you won't have a place to post your script that you are posting it even before it was ready ?

[seangriffin]

Are you afraid that you won't have a place to post your script that you are posting it even before it was ready ?

What better place to construct a post than in the post itself?

Not sure if I'll get a V0.1 done tonight. I'm gunna try though.

[longfields]

It doesn't seem to work. Syntax of the call:

$gamwind = WinGetTitle("[ACTIVE]", "")

$newdata = _TextractCapture($gamwind, "", "", "", 1, 1, 1)

I get the following error message:

C:\Program Files\AutoIt3\Include\Textract.au3 (111) : ==> The requested action with this object has failed.:

$TextractOCX.ReadWindow(Number($hwnd))

$TextractOCX.ReadWindow(Number($hwnd))^ ERROR

Any thoughts?

[pabloruiz55]

It doesn't seem to work. Syntax of the call:

$gamwind = WinGetTitle("[ACTIVE]", "")

$newdata = _TextractCapture($gamwind, "", "", "", 1, 1, 1)

I get the following error message:

C:\Program Files\AutoIt3\Include\Textract.au3 (111) : ==> The requested action with this object has failed.:

$TextractOCX.ReadWindow(Number($hwnd))

$TextractOCX.ReadWindow(Number($hwnd))^ ERROR

Any thoughts?

Hi, i am getting the same error, how can i solve this? Thanks

[H4CK3D]

Error Code:

>"x:\Program Files\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "xxx" /autoit3dir "x:\Program Files\AutoIt3" /UserParams    
+>15:07:28 Starting AutoIt3Wrapper v.2.0.1.24    Environment(Language:0415  Keyboard:00000415  OS:WIN_7/  CPU:X64 OS:X86)
>Running AU3Check (1.54.19.0)  from:D:\Program Files\AutoIt3
+>15:07:29 AU3Check ended.rc:0
>Running:(3.3.6.1):D:\Program Files\AutoIt3\autoit3.exe "xxx\123.au3"    
x:\Program Files\AutoIt3\Include\Textract.au3 (86) : ==> Variable used without being declared.:
$sel_index = _GUICtrlListBox_GetCurSel($hwnd)
$sel_index = _GUICtrlListBox_GetCurSel(^ ERROR
->15:07:32 AutoIT3.exe ended.rc:1
>Exit code: 1    Time: 6.842

My Code:

#include <Textract.au3>

$omg = _TextractCapture("java aplication")

msgbox(0, "", $omg)