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是否需要调用初始化过程。
{{----
相关问答：
如题。
感觉如何？交流下。
没有研究过，呵呵
有啥研究头？
那个东西，是个鸡肋，，没有什么意思，发现！！
用来做B/S架构的MIS系统的话应该可以提高界面开发的效率吧？
因为不熟悉Delphi � ......
已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试
在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......
//下面是一记录，三维坐标
type
Tposition = record
x:integer;
y:integer;
z:integer;
end;
//======下面是要在一个循环 ......
今天在网上无意看到有些公司使用盗版delphi IDE被查的事，说是有后门。
后来我测试了一下，启动delphi 7后确实会自动连接到美国的一个IP，不知道是传送一些什么信息。
像delphi7这么旧的版本他们还会查吗？
D ......
delphi代理问题 求解 在线等
procedure TForm1.Button3Click(Sender: TObject);
var
info : INTERNET_PROXY_INFO;
reg : TRegistry;
begin
reg := TRegistry.Crea ......
