Problem mit MenuItems - Werte übergeben?

[jim_raynor]

1. Was sind das für Instanzen? Sind das sichtbare COntrols? Nur dann funktioniert das mit FindComponent.

2. Jedes Control (auch TMenuItem) hat eine Tag Eigenschaft in der du einen Beliebigen Wert speichern kannst.

beim erstellen:

neuesItem.Tag := Integer(neuInstanz)

beim Auslesen:

InstanzObj := TKlasse((Sender as TMenuItem).Tag)

3. Statt TKlasse(FindComponent(InstanzName)); würde ich (FindComponent(InstanzName) as TKlasse); benutzen, da so auch der Typ geprüft wird. Es kann nämlich durchaussein, dass er nicht das findet, was du erwartest.