Events hooken + chainen

[TigerLilly]

Hi + danke für jede Info!

Ich durchforste meine Codebase + finde viele Sachen, die schon recht in die Jahre gekommen sind + die jetzt den neuen Delphi Versionen eleganter gelöst werden können bzw Eingang in diverse Libraries gefunden haben. Bei manchen Sachen weiß ich das aber nicht, ob es da schon was Kluges gibt:

Ich möchte fallweise einen Event hooken und dessen Aufruf mit dem ursprünglichen verbinden.
Also dieses:
OldEvent:=Form.OnResize;
Form.Onresize:=MyEvent;

Und MyEvent ruft dann OldEvent auf etc.

Ich würde gerne einen Aufruf dieser Art haben:
ChainEvent(Form.OnResize,MyEvent);

Gibt es da schon irgendetwas?

Danke!

[jaenicke]

Sinnvoller wäre eine saubere Kapselung, die dann bei Bedarf auch z.B. generische Multicastevents anbieten kann.

Direkt von verschiedenen Stellen auf ein GUI-Event zugreifen zu wollen riecht nach zu starker Koppelung der Business Logik mit der GUI.

[TigerLilly]

Womit du natürlich völlig recht hast + meine Frage nicht beantwortest hast.

[mkinzler]

https://github.com/spinettaro/delphi-event-bus

[jaenicke]

Es gibt diverse Multicast Event Implementierungen, aber eben keine, die direkt auf die regulären GUI-Events aufsetzen. Denn das geht eben nicht sauber.

Deshalb ist die Lösung eben eine Kapselung, die die Events nach außen als Multicast anbietet. Da reicht im Zweifelsfall eine generische Liste mit dem Eventtyp.