Hallo,
folgendes Problem:
Ich habe ein dynamisch erzeugtes PopUp-Menü, welches wie folgt erzeugt wurde (Auszug):
Delphi-Quellcode:
...
MyMenuItem := TMenuItem.Create(Feldnamenzuordnen1);
MyMenuItem.Caption := AdressFields[i];
MyMenuItem.Tag := i;
MyMenuItem.Name := 'Adress_' + IntToStr(i);
MyMenuItem.OnClick := MyMenuItemClick;
Feldnamenzuordnen1.Add(MyMenuItem);
...
wobei Feldnamenzuordnen1 ein übergeordneter Menüeintrag ist.
In einer Routine will ich überprüfen, ob bestimmte Untermenüpunkte schon mal angeklickt wurden, um dann die Eigenschaft checked entweder auf true oder false zu setzen.
Dazu wollte ich
Feldnamenzuordnen1.FindComponent('Adress_' + IntToStr(i)).checked := true;
verwenden. Das klappt leider nicht!
Komischerweise funktioniert folgendes aber:
ShowMessage(Feldnamenzuordnen1.FindComponent('Adress_' + IntToStr(i)).name);
Was mach ich schon wieder falsch
