TMenuItem und RadioItem

[Martin K]

Hab mal ne Frage zu der Behandlung von MenuItems als RadioItems:

Gibt es nicht eine einfache Möglichkeit (ohne tausend IF-Anfragen) heruaszubekommen, welches Item gerade checked ist (also so etwas wie ItemIndex) ?

Noch was anderes:
Wenn ich mehrere RadioItems habe die zu einer Gruppe gehören und ich klicke auf ein Item das bereits checked ist,
so geht der Punkt weg (Checked = False).
Dann ist aber kein einziges Item in meiner Gruppe mehr checked...
Bei einer RadioGroup ist das anders!
Kann man das nicht auch bei MenuItems so machen wie in einer RadioGroup?

[marabu]

Hallo Martin,

Zitat von Martin K:

Gibt es nicht eine einfache Möglichkeit (ohne tausend IF-Anfragen) heruaszubekommen, welches Item gerade checked ist (also so etwas wie ItemIndex) ?

Du kannst die Eigenschaft "Tag" für deine Zwecke missbrauchen:

Delphi-Quellcode:

procedure TDemoForm.ItemClick(Sender: TObject);
begin
  with Sender as TMenuItem do
  begin
    Checked := true;
    case Tag of
      1: ;
      2: ;
      3: ;
      else ShowMessage(Caption);
    end;
  end;
end;

Zitat von Martin K:

Wenn ich mehrere RadioItems habe die zu einer Gruppe gehören und ich klicke auf ein Item das bereits checked ist, so geht der Punkt weg (Checked = False).

Nur wenn du AutoCheck = True hast. In meinem Beispiel steht es auf False und das Problem existiert dann nicht mehr.

Grüße vom marabu

[Martin K]

Zitat von marabu:

Du kannst die Eigenschaft "Tag" für deine Zwecke missbrauchen:

Ja, aber dann muss ich ja immer noch mit Case of alle MenuItems durchgehen...

Zitat von marabu:

Zitat von Martin K:

Wenn ich mehrere RadioItems habe die zu einer Gruppe gehören und ich klicke auf ein Item das bereits checked ist, so geht der Punkt weg (Checked = False).

Nur wenn du AutoCheck = True hast. In meinem Beispiel steht es auf False und das Problem existiert dann nicht mehr.

Grüße vom marabu

Ja schön, aber wenn AutoCheck False ist dann passiert ja überhaupt nix mehr, wenn ich draufklicke...

[marabu]

Fängst du alle deine Sätze mit Ja, aber an? Hast du dir meine Code-Zeilen überhaupt angesehen?
Sender ist das MenuItem, welches gerade angeklickt wurde - und es passiert schon etwas, wenn ich Checked auf True setze.

marabu

[Martin K]

Uuups..., stimmt...

Okay, Problem gelöst.

Danke