Ver Mensaje Individual
  #1  
Antiguo 03-10-2005
aranel aranel is offline
Miembro
 
Registrado: jul 2005
Posts: 37
Reputación: 0
aranel Va por buen camino
como llamar a un form desde una pestaña

HOLA!!!! Necesito saber si al crear un TPageControl con varias pestañas, es posible llamar desde cada una de ellas (TTabSheet) a un formulario, y si se puede, como se hacer, he encontrado por ahí el siguiente codigo, pero no se donde ponerlo o si funciona, por lo menos a mi no me sale nada :'(

Código Delphi [-]
 var
   aForm : TMyForm;
   tabSheet : TTabSheet;
 begin
   //Create a new tab sheet
   tabSheet := TTabSheet.Create(PageControl1) ;
   tabSheet.PageControl := PageControl1;
 
   //create a form
   aForm := TMyForm.Create(tabSheet) ;
   aForm.Parent := tabSheet;
   aForm.Align := alClient;
   aForm.BorderStyle := bsNone;
   aForm.Visible := true;
   tabSheet.Caption := aForm.Caption;
 
   //activate the sheet
   PageControl1.ActiveSheet := tabSheet;
 end;


Última edición por dec fecha: 03-10-2005 a las 14:13:15. Razón: ¡¡Encerrad el código fuente entre las etiquetas [DELPHI] ... [/DELPHI]!!
Responder Con Cita