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是否需要调用初始化过程。
{{----
相关问答：
delphi如何向Access数据表中自定义字段?然后显示到DBGrid中
怎么没人理我呀
分分忒少咧，一般人都懒得进来……*^_^*
SQL
creat table TableName(ID Counter Primary Key,FieldName varchar(20))
ADOQue ......
请问各位能不能看到delphi中自带组件的内部代码,比如怎么去看speedbutton的flat方法中的代码等.
SpeedButton1.Flat
鼠标移到Flat上，按住Ctrl键，左击
对了，SpeedButton1 必须是创建好的
是啊，就这� ......
假如光标在第二行开始处
其它编辑语言和文本编辑器都可以
按向前方面键
直接到达第一行的尾部
为什么DELPHI编辑器不可以呀
......
delphi代理问题 求解 在线等
procedure TForm1.Button3Click(Sender: TObject);
var
info : INTERNET_PROXY_INFO;
reg : TRegistry;
begin
reg := TRegistry.Crea ......
