荔园在线
荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀
[回到开始]
[上一篇][下一篇]
发信人: duck (我是一棵树), 信区: SoftDev
标 题: [合集]调用Dll的程序编译无法通过
发信站: 荔园晨风BBS站 (2006年01月15日22:36:16 星期天), 站内信件
☆ 1 ──────────── 我是分割线 ─────────────────☆
发信人: limee (lily), 信区: SoftDev
标 题: 调用Dll的程序编译无法通过
时 间: 2005年11月11日15:59:20 星期五
哪里出错了？
program testDll;
{$APPTYPE CONSOLE}
function
IntAdd(x, y : integer) : integer;
external 'TestAdd.DLL' ; stdcall;
var
x, y , z : Integer;
begin
x := 321;
y := 645;
z := IntAdd(x, y);
Writeln('The result is ', z);
end.
☆ 2 ──────────── 我是分割线 ─────────────────☆
发信人: duck (Delphi小王子), 信区: SoftDev
标 题: Re: 调用Dll的程序编译无法通过
时 间: 2005年11月11日18:46:07 星期五
单这样看这里调用没有错（Writeln的第二个参数可以接受integer类型？）
要看看你的Dll文件能不能调用得到，把出错信息帖出来
☆ 3 ──────────── 我是分割线 ─────────────────☆
发信人: limee (lily), 信区: SoftDev
标 题: Re: 调用Dll的程序编译无法通过
时 间: 2005年11月11日21:35:38 星期五
已经解决了
external 'TestAdd.DLL' ; stdcall;
~~~~~~~~~~~~~~~~~~~
在主单元编译的时候
stdcall; external 'TestAdd.DLL ;
这里的位置换一下就可以了
[回到开始]
[上一篇][下一篇]
荔园在线首页 友情链接：深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店