天天看點

害我查了半天的錯誤!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的主窗體

繼續閱讀