Сообщество Чайников

Вопрос

В главной форме есть меню NEW, типа как в Worde, при нажатии на которое появляется дочернее окно, еще раз нажмете — появится еще одно, получается это таким путем:
TForm2 *F=new TForm2(this);
но когда я хочу закрывать эти окна, они просто свертываются, но не закрываются. В чем дело, подскажите.

Ответ

Фишка в том, что в MDI приложениях Билдер по умолчанию не закрывает дочернюю форму, а сворачивает ее. Борются с этим так:
__fastcall TChildForm::OnClose(TObject* Sender, TCloseAction &Action)
{
…
Action=caFree; //(по умолчанию caMinimize, фиг знает зачем)
…
}
Вот и все, теперь дочерние окна закрываются.

7UP