Ver Mensaje Individual
  #2  
Antiguo 23-10-2006
Avatar de Bicho
[Bicho] Bicho is offline
Miembro Premium
 
Registrado: jul 2003
Ubicación: Inca - Mallorca
Posts: 1.776
Reputación: 22
Bicho Va por buen camino
Cita:
Empezado por Deiv
Yo estaba empezando algo así, más no puedo avanzar
¿Y que problema tienes?, ¿por qué no puedes avanzar más?

Lo que has puesto parece estar bien.

Yo lo que haría sería más o menos lo que sigue:
- Al seleccionar un Item del combobox poner algo así:

Código Delphi [-]
procedure TForm1.ComboBox1Select(Sender: TObject);
var form2 : Tform;
     MiBar : TInspectorBar;
begin
   try
      //creas el form, como seguro que sabes hacer y luego la barra
     MiBar := TInspectorBar.Create(Self);
     MiBar.Parent := Form2; //El parent debe ser el form que has creado
     MiBar.Panels.Add;
     MiBar.Panels[0].Caption:='Automóviles';
     //... continuas creando los paneles y al final muestras el form

     Form2.ShowModal;
   finally //al ser el modal el form, puedes controlar el cierre y eliminar todos los objetos
      MiBar.Free;
      Form2.Free;
   end;
end;

Se puede mejorar seguro, pero es una idea básica, que espero te sirva.

Saludos
Responder Con Cita