vb轉delphi問題。。。急全部分(15分)

  • 主题发起人 主题发起人 lzl200188
  • 开始时间 开始时间
L

lzl200188

Unregistered / Unconfirmed
GUEST, unregistred user!
vb文件
Declare Function Init_Com Lib "syris.dll" (ByVal comport As Integer) As Integer
dim a as integer
a=Init_com(1)

delphi
Function Init_Com(Var comport:Char):Integer; external'syris.dll';
var f:integer;
f:=init_com(1)
這樣出錯誤
 
似乎 Delphi中的 Comport应该是 integer吧
 
對不起我的問題是
vb文件
Declare Function Init_Com Lib "syris.dll" (ByVal comport As Integer) As Integer
dim a as integer
a:=init_com(1)

delphi文件
Function Init_Com(Var comport:Char):Integer; external'syris.dll';
var
dd:integer;
dd:=init_com(1)
這樣出錯,請高手指點
 

Similar threads

后退
顶部