掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
メインメニューから呼び出した別のフォームが稼動されているかを判定する方法は？ (ID:43931)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんばんは。 やってることはtakeさんと同じです。 詳細にはこんな感じで同じようなことをやっています。 これがベストかどうかはわからないけど、参考になれば… 1.プロジェクト→ソース表示にて、 Application.CreateForm(TForm2, Form2); を消す 2.Unit1 procedure TForm1.Button1Click(Sender: TObject); begin if Assigned(Form2) then Form2.Close; Form2 := TForm2.Create(Application); Form2.Show; end; procedure TForm1.Button2Click(Sender: TObject); begin if Form2 <> nil then begin Showmessage('稼動中'); end; end; 3.Unit2 procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction); begin Action := caFree; Form2 := nil; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.