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)
這樣出錯誤
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)
這樣出錯誤