Ver Mensaje Individual
  #11  
Antiguo 04-10-2006
Ade Ade is offline
Miembro
 
Registrado: jul 2006
Ubicación: Murcia
Posts: 70
Reputación: 18
Ade Va por buen camino
Problema solucionado, no se inhabilitar una sola pestaña, pero lo que he logrado es deshabilitar todas las pestañas excepto una (dejar sólo una con sus botones y demás), me explico:

tengo 4 pestañas:
1. Insertar,
2. Modificar/Eliminar,
3. Listado,
4. Salir.

yo queria controlar que cuando la tabla estuviera vacía se inhabilitaran las pestañas 2 y 3, pues al no haber registros solo puedes insertar o salir.

la pestaña salir no contiene nada, solo en el evento click de las pestañas tengo:
Código Delphi [-]
if Pestanas.ActivePage='Salir' then Cerrar(Proveedores);

en el evento crete del form puse:
Código Delphi [-]
procedure TProveedores.FormCreate(Sender: TObject);
begin 
{si la tabla esta vacia, deshabilito las pestañas}
     if ZTable1.IsEmpty then
         Pestanas.DisableAlign;//oculta el contenido de las pestañas
end;
lo cual me deja activa la pestaña 1 de insertar. y una vez insertado el 1º registro..
Código Delphi [-]
if not ZTable1.IsEmpty then Pestanas.EnableAlign;
espero haberme explicado bien, aqui lo dejo por si a alguien le sirviera
Saludos y gracias
Responder Con Cita