Einträge im Untermenü zur Laufzeit erzeugen

[EvilDragon]

glaube bin mit dem falschen bein aufgestanden... wieder ein prob..

in der klick-procedur soll erkannt welches newitem geklickt wurde... also z.b. newitem.caption in edit1.text geschrieben werden.. aber ich erhalte immer nen fehler mit zu wenig parameter.... *heul*

[Muetze1]

Moin!

Code im deinem neuen OnClick was die neuen Items bekommen haben:

Delphi-Quellcode:

  If ( Sender Is TMenuItem ) Then
    Edit1.Text := TMenuItem(Sender).Caption;

MfG
Muetze1