请问delphi如何调用powerbuilder中DLL的函数?
powerbuilder中的调用声明publicfunctionstringgetdiskser()library"diskser.dll"aliasfor"GetDis...
powerbuilder中的调用声明
public function string getdiskser () library "diskser.dll" alias for "GetDiskSER"
没有PB的基础,但根据Delphi自己写下下面的声明
在delphi中我的调用方法是
function GetDiskSER():string; external 'diskser.dll';
在button的onclick中
showmessage(GetDiskSER());//没报错,但也没有字符,也就是空的。不知道这样调用是否有问题,希望高手帮忙。 展开
public function string getdiskser () library "diskser.dll" alias for "GetDiskSER"
没有PB的基础,但根据Delphi自己写下下面的声明
在delphi中我的调用方法是
function GetDiskSER():string; external 'diskser.dll';
在button的onclick中
showmessage(GetDiskSER());//没报错,但也没有字符,也就是空的。不知道这样调用是否有问题,希望高手帮忙。 展开
展开全部
GetDiskSER()
是不是应该有参数的吧,至少要指定个盘符吧,你应该是没看全powerbuilder的程序,按照字面的理解应该是获取磁盘的相关的序列号吧
是不是应该有参数的吧,至少要指定个盘符吧,你应该是没看全powerbuilder的程序,按照字面的理解应该是获取磁盘的相关的序列号吧
追问
public function string getdiskser () library "diskser.dll" alias for "GetDiskSER"
PB中复制过来的声明。。getdiskser()这里是没有任何参数的。
还有我按照你说的搞个参数进去
function GetDiskSER(s:char):string; external 'diskser.dll';//因为上面没参数所以s:char是随便加上去的类型。
调用时
showmessage(GetDisSER('c'));//也是一样没数据,同样也没报错。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询