Ereignisse von dynamisch erzeugten Menüs

Jojojoxx · Beiträge: 386

Hallo!

Ich erzeuge in einem Programm während der Laufzeit Einträge eines Untermenüs (TMenuItem).
Wie kann ich das OnClick-Ereignis eines solch dynamisch erzeugten Eintrags abfangen, da ich es ja im Objektinspektor nicht auswählen kann.
Danke für die Hilfe!
mfg

Jojo

Christian S. · Beiträge: 20451 Erhaltene Danke: 2264 Win 10 C# (VS 2019)

Einfach eine entsprechende Methode zuweisen:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

type
  TForm1 = class(TForm)
    procedure MyOnClick(Sender : TObject);
  end;

...

myMenuItem.OnClick := MyOnClick;

Ist ausm Kopf geschrieben, kann also fehlerhaft sein. Prinzip dürfte passen

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".

Jojojoxx · Beiträge: 386

Hi!

Dann erhalte ich den fehler "Ungenügende Forward- oder External-Deklaration".
mfg

Jojo

Christian S. · Beiträge: 20451 Erhaltene Danke: 2264 Win 10 C# (VS 2019)

Du musst MyOnClick schon noch implementieren ...

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".

Jojojoxx · Beiträge: 386

Hi!

Habs grad hinbekommen, vielen Dank für deine Hilfe!
mfg

Jojo

Jojojoxx · Beiträge: 386

Hi!

Jetzt hab ich ein anderes Problem. Mit Sender wird ja das Objekt übergeben (in meinem Falle also ein TMenuItem).
Aber ich kann wenn ich "Sender." eingebe, nicht die TMenuItem-spezifischen Punkte finden wie Caption usw...
Wie kann ich daran kommen?
Danke!
mfg

Jojo

Christian S. · Beiträge: 20451 Erhaltene Danke: 2264 Win 10 C# (VS 2019)

Da der Parameter Sender vom Typ TObject ist, musst Du ihn in ein TMenuItem casten:

markieren

Delphi-Quelltext

1:	TMenuItem(Sender).Caption

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".

Jojojoxx · Beiträge: 386

Super, klappt!

Vielen Dank für deine Hilfe zu noch so später (oder eher früher) Stunde

mfg

Jojo

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme