🚀 go-pugleaf

Jose Manuel Tovar wrote:

> I have a main form (Form1) and when I press a button I create a new no modal
> form (Form2). In order to destroy Form2 I use "caFree".

How many Form2's do you allow to exist simultanously ?

> void __fastcall TForm1::btn_botonClick(TObject *Sender)
> {
    // To allow only one Form2
     if ( ! Form2 )
	   Form2 = new TForm2(Application);
	// As Application is the Owner your
         // Form will be deleted by TApplication
	// at programm end

>   Form2->Show();
> }


> void __fastcall TForm2::FormClose(TObject *Sender,
>       TCloseAction &Action)
> {
>   Action = caFree;
    // Ok

> __fastcall TForm2::~TForm2()
> {
>   Form2 = 0;

That is ok, provided you keep the caFree;

> I think this is possible but what happens with all the windows standard
> controls (labels, combos, etc ) defined in Form2?, are they destroyed
> automatically?

Yes. If the Form is destroyed the componets are destroyed too.

> Thanks in advance,

??

What kind of whitelineproducer do you happen to use ?

Hans.