代码如下:
type
TGetDllValue = function(VocCh: integer; var CallInfo: TCallerInfo; var Channelstatus: TChannelStatus; adoquery: tadoquery): tcallerinfo; stdcall;
var
adr:TGetDllValue;
……
@adr:= GetProcAddress(loadlibrary('etell.dll'),pchar('onwelcome'));
adr(VocCh, CallerInfo[VocCh], Channelstatus[VocCh], adoquery); 结果是@adr为nil,而该代码放在其他过程中可以用,搞不懂。
type
TGetDllValue = function(VocCh: integer; var CallInfo: TCallerInfo; var Channelstatus: TChannelStatus; adoquery: tadoquery): tcallerinfo; stdcall;
var
adr:TGetDllValue;
……
@adr:= GetProcAddress(loadlibrary('etell.dll'),pchar('onwelcome'));
adr(VocCh, CallerInfo[VocCh], Channelstatus[VocCh], adoquery); 结果是@adr为nil,而该代码放在其他过程中可以用,搞不懂。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货