|
|
||||
Tips > |
|||||
FormCount で存在する Form の数を調べる |
更新 : 2009/12/16 |
||||
|
|
||
解説: 複数の Form を組み合わせて使用するアプリケーションでは、現在いくつの Form が生成されているか、確認したい時があります。TScreen 型のグローバル変数 Screen を使うと、画面の現在の状態を調べることができます。 使用例: 例では、Screen の FormCount プロパティを使って、画面に表示されているフォームの数を取得しています。 コンポーネントは、 Button を適当に置くだけです。 コーディングは、Button1 の OnClick イベントで、動的に Form を作成し、表示させています。 Form の数は ShowMessage で表示させ、破棄した後、再び Form 数を数えています。 Form の数が変わるのが分かると思います。 //------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { //動的にフォームを作成 TForm *form = new TForm(Application); form->Show(); //フォーム数を表示 ShowMessage(IntToStr(Screen->FormCount)); //破棄 delete form; //フォーム数を表示 ShowMessage(IntToStr(Screen->FormCount)); } //------------------------------------------------------------------- |