menu y submenú

[ecfisa]

Hola cmfab.

No entiendo cual es el problema. Si el menu padre debe ejecutar automáticamente el primer menu hijo, ya le has dado la solución: Asignar al menu padre el procedimiento del evento OnClick del primer menu hijo. O con igual resultado, también podes hacer:

Código Delphi [-]
procedure TForm1.Menu1Click(Sender: TObject);
begin
  submenu1_1.Click;
end;

Un saludo.

[cmfab]

Garcias por la respuesta. si eso fue lo primero que hice. lo que pasa es que cuando se enfoca el item padre que se abre el submenu se lanza el evento del oncliick automaticamente antes de hacer click sobre el item padre

[ecfisa]

Hola cmfab.

Ese es el comportamiento por defecto tanto del TMainMenu como del TPopupMenu. Cuando un TMenuItem tiene un submenu,
el evento OnClick se dispara antes que el submenu sea mostrado, sin ser necesario hacer click sobre el.
Desconozco si dicho comportamiento puede ser modificado.

Un saludo.

[cmfab]

Gracias por las respuestas
alquien conoce como hacer para que no se dispare este evento si no se hace click sobre el item padre