Ayuda para solventar un error de diseño

[Willo]

Empezado por Willo

Pues estoy utilizando los ToolButtons, no sabia que la toolbar se podian usar de otros botones, lo intentare!.

Comprobado, no se puede...

[Willo]

San Google me ayudo a encontrar este procedimiento....

procedure Form1.SpeedButton1Click(Sender: TObject); 
 var 
  hOldControl : TWinControl; 
 begin 
   hOldControl := ActiveControl; 
   ActiveControl := nil; 
   ActiveControl := hOldControl; 
   // further processing 
 end;

probando...

[Willo]

Con un simple:

ActiveControl := nil;

es mas que suficiente!!