if FEvents <> nil then
FEvents.OnReceiveInfo:=ReceiveInfoEvent(_Command, Copy(Str, 1, Index-1));
[Error] SendImpl1.pas(412): Not enough actual parametersprocedure TSend.ReceiveInfoEvent(CommandID: SYSINT; const MSG: WideString);
begin
if FEvents <> nil then FEvents.OnReceiveInfo(CommandID, MSG);
end;procedure OnReceiveInfo(CommandID: SYSINT; const MSG: WideString); dispid 209;
FEvents.OnReceiveInfo:=ReceiveInfoEvent(_Command, Copy(Str, 1, Index-1));
[Error] SendImpl1.pas(412): Not enough actual parametersprocedure TSend.ReceiveInfoEvent(CommandID: SYSINT; const MSG: WideString);
begin
if FEvents <> nil then FEvents.OnReceiveInfo(CommandID, MSG);
end;procedure OnReceiveInfo(CommandID: SYSINT; const MSG: WideString); dispid 209;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货