站長被一個網友問到一個觀念的問題: 拉一個TQuery元件(Query1)於TForm上(Form1), 當此Form1.Close且Form1.Free之後 原先Query1已open的資料庫通道,需不需要由程式去下Query1.Close? 1.是Form1 Close時就會自動執行Query1.Close 2.或是Form1 Free時會自動執行Query1.Close 3.或是一定要在Form1.OnClose()事件中自己去下Query1.Close的動作,才能讓資料庫的通道去除! 網友您的答案是多少? 謝謝指導! ～～～Delphi K.Top討論區站長～～～

------
～～～Delphi K.Top討論區站長～～～

若是用拉元件的方式建立這一個Query 在Form被free掉時會一並被free掉 若是在程式碼中自行create 就必須在程式中自行free 也就是說我會選 (2)

我也是選 (2)

引言: 站長被一個網友問到一個觀念的問題: 拉一個TQuery元件(Query1)於TForm上(Form1), 當此Form1.Close且Form1.Free之後 原先Query1已open的資料庫通道,需不需要由程式去下Query1.Close? 1.是Form1 Close時就會自動執行Query1.Close 2.或是Form1 Free時會自動執行Query1.Close 3.或是一定要在Form1.OnClose()事件中自己去下Query1.Close的動作,才能讓資料庫的通道去除! 網友您的答案是多少? 謝謝指導! ～～～Delphi K.Top討論區站長～～～

我查 TQuery 的 Source code 如下:

destructor TQuery.Destroy;
begin
  Destroying;
  Disconnect;
  SQL.Free;
  FParams.Free;
  FDataLink.Free;
  StrDispose(SQLBinary);
  inherited Destroy;
end;    procedure TQuery.Disconnect;
begin
  Close;
  UnPrepare;
end;

TQuery 的 owner 是 form, 而 onwer 有責任 Free 所屬的 object, 所以在 Destroy 中是會作 Close 的動作.

感謝ryback,owenyang,danny等網友的回覆, 讓我的觀念更加踏實,謝謝! ～～～Delphi K.Top討論區站長～～～

------
～～～Delphi K.Top討論區站長～～～