首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB下怎么调用Delphi写的一个DLL? 请各位帮帮忙

2012-01-08 
VB下如何调用Delphi写的一个DLL? 请各位大虾帮帮忙。请各位大虾帮忙,分少点,却已是我全部家当。在Delphi里說

VB下如何调用Delphi写的一个DLL? 请各位大虾帮帮忙。
请各位大虾帮忙,分少点,却已是我全部家当。    
 
在Delphi里說明是这样的:    
 
function     abcd(sStr:string):boolean;export;    
external     'ABCDS.dll ';    
 
请问:    
我在VB下如何去调用     ABCDS.dll     里的     "abcd     "


[解决办法]
Public Declare Function abcd Lib "ABCDS.dll " Alias "abcd " (ByVal sStr As String) As boolean
我没有试,你试一试!

[解决办法]
Public Declare Function abcd Lib "ABCDS.dll " Alias "abcd " (ByVal sStr As String) As boolean
好像不需要Alias "abcd " 吧?多余的感觉


用Instr函数,
Dim intPos As Integer
intPos = InStr(1, "abc123 456: xyz ", "abc123 ")
从 "abc123 456: xyz "字符串的第1位开始比对,当第一次出现 "abc123 "字符串时,返回其位置值至intPos
[解决办法]
Public Declare Function abcd Lib "ABCDS.dll " Alias "abcd " (ByVal sStr As String) As boolean
好像不需要Alias "abcd " 吧?多余的感觉

要,因为调用的时候用了String类型,如果我们调用的API函数要使用字符串(参数中包含String型)的话,Alias关键字是必须的。这是因为在ANSI和Unicode字符集中同一API函数的名称可能是不一样的,为了保证不出现声明错误,我们使用Alias关键字指出API函数的别名,一般来说在WIN9X平台下我们把API函数名后加一个大写A作为别名即可。

热点排行