天天看点

害我查了半天的错误!av错误,小心Component对象使用Application当Owner

var

  ConnectionService := TConnService;

procedure TfrmMain.FormCreate(Sender: TObject);

begin

  ConnectionService := TConnService.Create(Application);

end;

destructor TfrmMain.Destroy;

  ConnectionService.Free//执行这里时出错,原因使用Application当Owner

//,在这之前Application自动把ConnectionService释放掉了(把Owner为Application的都释放掉了)

  inherited;

这样会出错,frmMain为Application的主窗体

继续阅读