关闭窗体的问题(100)

在Form1的button1上,点击时弹出一个小窗体CheckFrm，在CheckFrm上输入姓名后，点确定按钮，则显示Form2。 现在的问题是，显示Form2后，如何自动关闭掉CheckFrm？ 我现在如果在Form2的onshow写CheckFrm.free时，会报错。只能等Form2关闭后，才能关闭CheckFrm，很不方便，请大家不吝刚才赐教，谢谢！

呵呵，你是没有进行主窗体和了窗体设置，设置下就好了

Form2是由CheckFrm调用出来的， 不能先关闭宿主窗体， 你可以把Form2隐藏起来。

在显示Form2之前，加Hide和Closeprocedure TCheckFrm.Button1Click(Sender: TObject);beginForm2:=Tform2.Create(self);With Form2 dobeginShowModal;Hide;Free;end;close;end;

void __fastcall TForm1::Button4Click(TObject *Sender){ TForm2* Form2 = new TForm2(NULL); Form2->Tag = (int)this;//Form1窗体的指针赋值给Form2窗体的Tag Form2->Show(); this->Hide();}然后在From2窗体的Close中执行下面的void __fastcall TForm2::FormClose(TObject *Sender, TCloseAction &Action){ ((TForm1*)Tag)->Close(); }我以前是做Delphi的不过.现在转C++Builder了.他们两个是同一个爹的.应该不会差异太大把.还有.在Form1中Include Unit2. Form2中Include Unit1才可以.

哦.不好意思 忘记了.一点.Delphi不可以交叉引用.[]