検索結果を再度画面を表示したときも残すようにしたい。

前提・実現したいこと

DelphiでMySQLのデータを検索する機能を作っています。
検索結果を出力した後に、画面を閉じ、再度画面を開いた際に、前回の検索結果が表示される状態にしたいと思っています。
どの点に着目して、どういう設定にすればいいのかご教授頂けたらと思います。
プロシージャ内のソースコードが怪しいのか、プロパティなどか、データモジュール側なのか。
その他など。

該当のソースコード

Delphi
1// 表示初期化
2procedure Tfrmitems2.FormShow(Sender: TObject);
3var
4  strSQL : String;
5begin
6  DataModuleitems.openModule;
7
8  strSQL := 'select 省略';
9  with DataModuleitems.FDQmitem_list2 do
10  begin
11    SQL.Text := strSQL;
12    Active := False;
13    Active := True;
14  end;
15
16end;
17
18
19// 検索
20procedure Tfrmitems2.FrmBtn41btnsrchClick(Sender: TObject);
21var
22  strSQL1 : String;
23  strSQL2 : String;
24begin
25  FrmBtn41.btnsrchClick(Sender);
26
27  strSQL1 := 'select 省略 '
28  strSQL2 := '省略';
29
30  strSQL1 := strSQL1 + strSQL2 + ' order by 省略';
31  with DataModuleitems.FDQmitem_list2 do
32  begin
33    SQL.Text := strSQL1;
34    Active := False;
35    Active := True;
36  end;
37
38end;
39
40// 閉じる
41procedure Tfrmitems2.FormClose(Sender: TObject;
42  var Action: TCloseAction);
43begin
44  DataModulePickitems.closeModule;
45end;
46
47

試したこと

上記の仕様が出来ているフレームがあり、そちらと見比べて、表示初期化、検索、クローズのソースコード、プロパティ、イベントなどを一通り見比べて修正デバッグ実行を試したのですが、上手くいきませんでした。

補足情報（FW/ツールのバージョンなど）

Embarcadero® Delphi 10.1 Berlin

＜追記1＞
検索フレームのソースコード、表示、検索、閉じるを追記。必要ない箇所はかなり簡略化しました。
SQL文とデータベース側は問題ないかと思われるのでテーブル情報は一先ず置いておいきます。

＜追記2＞
簡略化したコードを眺めて気づいたのですが、DataModuleitems.FDQmitem_list2に検索でSQL文を埋めた後、再表示すると元のSQL文をまた再表示してしまってることに気づきました。テーブルを別々にして試してみようと思います。
⇒データクエリを二つ作ってみたのですが、表示するグリッドを一つにしたいので断念しました。