delphi调用图形识别dll出错!!!!!!!
delphi 调用图形识别dll总是报地址之类的错误，请大家帮忙看看是什么问题,代码如下:
implementation
function OCR(imgname:string;i:integer):PChar;stdcall;external 'AspriseOCR.dll';
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
vcode:PChar;
filename:string;
begin
filename:='test1.bmp';
vcode:=OCR('e:\poll\demo\test1.bmp',-1);
edit1.Text:=strpas(vcode);
end;
end.
谁给你做的dll, 第一个参数是 string ?
dll用delphi写的吗?
不是的，是在国外的一个网站下载的DLL，说明文档说是可以支持delphi但没有例程，这是我仿VB的例程写出的。
VB的例程是：
private declare function ocr lib "aspriseocl.dll"(byval file as string,byval imagetype as long )as string
private declare function ocrbarcodes lib "asperiseocr.dll"(byval file as string,byval imagetype as long ) as string
private declare function ocrpart lib "aspriseocr.dll" (byval file as string,byval imagetype as long,byval startx as long,byval starty as long,byval width as long,byval height as long) as string
private sub command2_click()
dim ret as string
ret=ocr("c:\test.bmp",-1)
end sub
回楼上，改了还是报一样的错
access violation at 0x00000000:read of address ox00000000'.
那就应该查一下文件路径是否正确、该Dll是否需要调用初始化过程。
{{----
相关问答：
我在模块里自定义了一个函数:stradd()
可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...
这个问题有什么办法可以解决的吗? 非常感激!
(在A ......
我用ftp上传一个文件到ftp服务器上，前几天都用的好好的，后面一直到现在连不上ftp了
-------------------------------------
IdHTTP1:=TIdHTTP.Create(GetIP); //为防止断网后idhttp无法启动起来,所以 ......
如何让MDI窗体只能建立一个子窗体?
1、只要一个子窗体，那用MDI意义何在呢，可以直接用SDI窗体了
2、如果一定要这样，通过TForm.MDIChildCount属性控制
楼主想要做一个导航界面？？
导航页面的实现思� ......
//下面是一记录，三维坐标
type
Tposition = record
x:integer;
y:integer;
z:integer;
end;
//======下面是要在一个循环 ......
delphi代理问题 求解 在线等
procedure TForm1.Button3Click(Sender: TObject);
var
info : INTERNET_PROXY_INFO;
reg : TRegistry;
begin
reg := TRegistry.Crea ......
