L
laker6274
Unregistered / Unconfirmed
GUEST, unregistred user!
VC动态库说明:int Get_NodeTime(HANDLE icdev,LPSTR DateTime)
VB声明:Declare Function Get_NodeTime Lib "yccomm"
(ByVal icdev&, ByVal datetime$) As Long
VB调用:Dim strTime As String * 1000
intRet = Get_NodeTime(icdev, strTime)
没有问题
Dephi声明:function Get_NodeTime(icdev:THandle;DateTimechar):integer;stdcall;
function Get_NodeTime;external 'yccomm.dll';
delphi调用:var strTime:string;
intRet:=Get_Nodetime(icdev,pchar(strTime));
调用的时候就报错,出错在一个内存地址,有谁知道为什么?可能哪里出错
VB声明:Declare Function Get_NodeTime Lib "yccomm"
(ByVal icdev&, ByVal datetime$) As Long
VB调用:Dim strTime As String * 1000
intRet = Get_NodeTime(icdev, strTime)
没有问题
Dephi声明:function Get_NodeTime(icdev:THandle;DateTimechar):integer;stdcall;
function Get_NodeTime;external 'yccomm.dll';
delphi调用:var strTime:string;
intRet:=Get_Nodetime(icdev,pchar(strTime));
调用的时候就报错,出错在一个内存地址,有谁知道为什么?可能哪里出错