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