advocr.pas

用delphi 编写的 验证码识别程序

unit AdvOcr;

interface

const
  DLL_NAME = 'AdvOCR.dll';

  procedure IMG2BMP(filename : PChar); Stdcall;external DLL_NAME name 'IMG2BMP';
  function OcrInit : boolean; Stdcall;external DLL_NAME name 'OcrInit';
  procedure OcrDone; Stdcall;external DLL_NAME name 'OcrDone';
  function OCR_C(OCR_type,filename : PChar): PChar; Stdcall;external DLL_NAME name 'OCR_C';

implementation

end.