掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
別フォームの表示情報の更新 (ID：47173)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
通りすがりさん、 おっしゃったとおり自分の質問では、方法までは聞いていませんでした。 ありがとうございます。 procedure TFrmMain.bbtnInsertClick(Sender: TObject); begin // 登録 FrmRegbox := TFrmRegbox.Create(Self); try FrmRegbox._KNO := 0; if FrmRegbox.ShowModal = mrOk then begin ADOQMei.Requery(); if not (ADOQMei.Bof and ADOQMei.Eof) then ADOQMei.Locate('KNO',FrmRegbox._KNO,[loCaseInsensitive, loPartialKey]); end; finally FrmRegbox.Release; end; Proc_DispDBG; end; procedure TFrmRegbox.bbtnAddDataClick(Sender: TObject); begin if Func_ChkReg then begin if FintKNO > 0 then begin Proc_Update; if FintKNO = -1 then ModalResult := mrCancel else ModalResult := mrOk; end else begin Proc_Insert; end; end; end; 上記に書いたソースがメインフォームから登録フォームを表示させ、登録後に登録フォームを閉じるとメインフォームが更新されるようにしたソースです。 これを私が希望した動きにするにはどのようにすれば良いでしょうか？
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.