1 reply to this topic

[dooper]

En primer lugar Felices Fiestas y próspero año Nuevo, a todo los compañeros de este foro, os deseo un buen año entrante.
 
Como es algo que no consigo entender, espero a ver si alguna pequeña clase magistrar pudiera sacarme del problema.
 
Tengo Unit1 y Unit2 (Form1 y Form2). En Unit1 tengo un pageControl1 con un Tabsheet (creado en tiempo ejecución) y con el form2 cargado en ese tabsheet.
 
Ese Form2 tiene botón de cerrar. Lo que quiero es cerrar el Form2 y el Tabsheet. Pero no soy capaz de cerrar este último desde el Form2. Si lo hago desde el form1 con pagecontrol1.activepage.free, si lo hace.
 
 

delphi

Unit2
....
....
 
Procedure ButtononClick(Sender: TObject); begin
       close();
       pagecontrol1.activepage.free; // Debo declarar pageControl1 como variable TPageControl en Unit2, sino no me lo reconoce, aunque ya está en Unit1 creada.
                                                       // Explota con ventana Ensamblador.
end;

 
Un saludo compañeros.

[egostar]

Hola dooper,

 

Donde estás creando el Tabsheet, y cuando dices "quiero cerrar el TabSheet" a que te refieres?

 

Saludos y felices fiestas