龙之吻:
【技术贴】请各位大牛给看看,又遇上了很神奇的问题了。
[阅读: 479] 2007-05-28 08:54:57
环境:delphi7 update1
dll中导出的函数声明如下:
a1.dll中和a2.dll中都有InitModule函数。在delphi中声明如下。。
function ABInitModule:Boolean; stdcall;
function SMSInitModule:Boolean; stdcall;
implementation
function ABInitModule; external 'alarmbox.dll' name 'InitModule';
function SMSInitModule;external 'SmsCfg.dll' name 'InitModule';
两个dll的函数名一样,返回值类型一样。不同的只是dll的名字。
调用的时候:
if ABInitModule then
showmessage('AB succ');
if SMSInitModule then showmessage('SMS succ')
else showmessage('SMS Fail');
ABInitModule 返回的是 true SMSInitModule ;返回的是false。
如果先调用SMSInitModule,SMSInitModule 返回的是true ,ABInitModule 返回的就是false;
这两个函数单独调用返回的都是true

机器人,
这首歌学会了没有?

我们的目标是->没有蛀牙!
