Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi Einträge im Untermenü zur Laufzeit erzeugen

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

Muetze1 (Gast) n/a Beiträge	#12 Re: Einträge im Untermenü zur Laufzeit erzeugen 12. Jun 2004, 16: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