delphi F9运行的时候出现未将对象引用到对象的实例
delphi F9运行的时候出现未将对象引用到对象的实例这个问题该如何解决呀？
研究了好久 不知道怎么搞
procedure TAPPGate.FWiteIni(SKey, SValue: String);
Var
AIniF: TIniFile;
begin
AIniF := TIniFile.Create('.\CasualGameGetServer.ini');
try
AIniF.WriteString('AppGateConfig', SKey, SValue);
finally
AIniF.Free;
end;
end;
procedure TAPPGate.TimerOnLineTimer(Sender: TObject);
begin
self.Caption := 'App 网关 ' + CGGSService.GetOnLineCount;
end; AIniF 可能是空对象
SKey, SValue 也可能是null object 鼠标指针那一行报错吗？
https://herder.cdn.bcebos.com/images/dot.gif 目测代码问题不大啊
https://herder.cdn.bcebos.com/images/dot.gif 本帖最后由 chinawolf2000 于 2020-8-14 19:53 编辑
AIniF := TIniFile.Create('.\CasualGameGetServer.ini');
确定这个相对路径能否加载成功
要是我肯定不这么写，可以先获取程序所在的路径
ExePath:=ExtractFilePath(Application.Exename);
路径补齐后，再判断下这个配置文件存在不存在，如果不存在还可以创建，这样能保证AIniF的创建能够成功
再判断传进来的参数是否为空
多一些判断就能避免很多问题
也可以单步运行，看看到哪出了问题
页:
[1]