home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: Science
/
Science.zip
/
goat006.zip
/
SRC.ZIP
/
goatsrc
/
SubProcs
/
ocrscanselected
< prev
next >
Wrap
Text File
|
2002-07-10
|
462b
|
18 lines
croptmpimagefilename=imagename||'_CROP.TIF'
CALL VpImgEdt window, 1000, 'SAVE', croptmpimagefilename, lzw
/* Crop 1000 Image Editor */
CALL VpImgEdt window, 1000, 'CROP'
if gocrconfigopen=1 then
call ocrconfigvals
call ocrscanimage
/* Clear 1000 Image Editor */
CALL VpImgEdt window, 1000, 'CLEAR'
/* Load image 1000 Image Editor */
CALL VpImgEdt window, 1000, 'LOAD', croptmpimagefilename, options
rc=SysFileDelete(croptmpimagefilename)