MDIの子フォーム (ID:44257)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 サンプルプログラムありがとうございました。 動作も確認しました。 自分の環境でも同じように作成し問題無く動作しました。 ただ、 子フォームの自動作成は行わずにメイン画面から 子フォームを作成するとエラーになってしまいます。 WINDOWS XP DELPHI2006の環境です。 プロジェクトFTEST FTEST1 fsMDIForm FTEST2 fsMDIChild 自動作成フォームから使用可能フォームへ FTEST3 fsMDIChild 自動作成フォームから使用可能フォームへ procedure TFTEST1.BTNCLICK(Sender: TObject); begin CHILD_OPEN; end; PROCEDURE TFTEST1.CHILD_OPEN; VAR CFRM2 : TFTEST2; CFRM3 : TFTEST3; BEGIN CFRM2 := TFTEST2.CREATE(APPLICATION); CFRM3 := TFTEST3.CREATE(APPLICATION); END; procedure TFTEST3.Button1Click(Sender: TObject); begin FTEST3.Edit2.Text := 'テストです'; end; 何度もやり取り申し訳ありません。