Tema: TControlBar
Ver Mensaje Individual
  #3  
Antiguo 18-08-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.110
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Creo que puedes lograr lo que persigues haciendo uso del método "FindChildControl" conque cuentan los "TControlBar", los cuales lo heredan de "TWinControl". Sería algo más o menos así:

Código Delphi [-]
  procedure TForm1.BitBtn1Click(Sender: TObject);
  begin
    if ControlBar1.FindChildControl('ToolBar1') <> nil then
      Caption := 'ToolBar1 está en el ControlBar1';
  end;
__________________
David Esperalta
www.decsoftutils.com

Última edición por dec fecha: 18-08-2005 a las 21:42:15. Razón: (corrección del texto)
Responder Con Cita