Zitat von
marabu:
Hallo Peter,
ich habe die Komponente TAdvMainMenu installiert und unter D7 getestet. Sie verhält sich genau so wie TMainMenu - ein OnClick() Ereignis wird nicht ausgelöst.
marabu
Danke.
Dann ist das wohl ein Bug in D2006.
Mein mit dem ersten Beitrag geliefertes Beispiel zeigt genau diesen Bug.
Es sind 2 Menü mit Untermenüs und ein Menü ohne Untermenü.
Bei disem Menü ist das Ereignis onClick belegt.
procedure TForm3.ohnePopupMen1Click(Sender: TObject);
begin
Edit1.Text := 'Click ohne PopUp';
end;
Öffne ich ein Popupmenü und fahre dann mit der Maus über dieses Menü wird sofort onClick ausgelöst.
Ich habe das ganze unter Chrome getestet, da ist das Verhalten korrekt.
Gruß Peter