PopupMenü abfragen, Werte setzen, usw.

[sonicfire]

Servus allerseits!

Schon seit geraumer Zeit versuche ich jetzt ein simples Popup-Menü
abzufragen, und entsprechend nach dem, was geklickt wurde, zu reagieren.

Aber es will mir einfach nicht so recht gelingen, daher meine Frage:

Wie kann ich schauen ob ich einen bestimmten Eintrag in einem Popup-Menü
gewählt habe UND wie kann ich dann z.B. (bei einem Eintrag mit Häckchen)
das Häckchen entsprechend entweder setzen oder entfernen ?

Ich hoffe jemand kann mir helfen - ansonsten verzweifel ich hier noch!

[dataspider]

Hallo sonicfire,

in dem Ereignis OnClick des MenuItems ist der Parameter Sender der angeklickte MenuItem.
Damit kannst du etwa wie folgt abfragen:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
... 
  miCheck: TMenuItem;
...
procedure TForm1.miCheckClick(Sender: TObject);
begin
  if (Sender = miCheck) then
    miCheck.Checked := not miCheck.Checked;
end;

In dem Beispiel schalte ich nur immer im Code um. AutoCheck sollte Fale sein.

Cu, Frank