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*

Moin!

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

markieren

Delphi-Quellcode:

			  If ( Sender Is TMenuItem ) Then

    Edit1.Text := TMenuItem(Sender).Caption;

MfG
Muetze1

Einträge im Untermenü zur Laufzeit erzeugen

Re: Einträge im Untermenü zur Laufzeit erzeugen

Re: Einträge im Untermenü zur Laufzeit erzeugen

Forumregeln

EvilDragon Registriert seit: 15. Sep 2003 Ort: Berlin 143 Beiträge Delphi 7 Enterprise	#11 Re: Einträge im Untermenü zur Laufzeit erzeugen 12. Jun 2004, 17:06 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 www.codedragon.de check this out!
	Zitat

Muetze1 (Gast) n/a Beiträge	#12 Re: Einträge im Untermenü zur Laufzeit erzeugen 12. Jun 2004, 17:07 Moin! Code im deinem neuen OnClick was die neuen Items bekommen haben: markieren Delphi-Quellcode: If ( Sender Is TMenuItem ) Then Edit1.Text := TMenuItem(Sender).Caption; MfG Muetze1
	Zitat