Ver Mensaje Individual
  #1  
Antiguo 07-04-2006
Choclito Choclito is offline
Miembro
 
Registrado: jul 2004
Posts: 169
Reputación: 20
Choclito Va por buen camino
Lightbulb problema al crear tabsheet

hola amigos del foro mi problema es el siguiente:
En tiempo de ejecucion quiero crear n tabshet que la creacion sea la cantidad de registros de un query
el codigo en el oncreate del form es el siguiente

Código Delphi [-]
while modulo_cita.MDOQ_Doctor.Eof do
begin
 Aux := TTabSheet.Create(self);
     Aux.Name := modulo_cita.MDOQ_Doctor.Fields[0].asstring;
     Aux.PageControl := f_cita.PageControl1;
     Aux.Caption := modulo_cita.MDOQ_Doctor.Fields[1].asstring;;
     aux.Visible:=true;
     f_cita.PageControl1.ActivePageIndex := (f_cita.PageControl1.PageCount - 1);
     modulo_cita.MDOQ_Doctor.Next;
end;

pero no hace nada... quiero q en cada tabsheet este el nombre del doctor pero no hace nada no crea ni un tabsheet, quiero crear n tabsheet pero no hace nada , como arreglo esto?????
como siempre les estare muy agradecido por su valiosa ayudaaaaaa

Última edición por dec fecha: 07-04-2006 a las 18:05:45.
Responder Con Cita