Ereignisbehandlungroutine zuweisen?!

[Stevie]

Hi Leute,

ich hab eine neue Komponente erstellt, die als Eigenschaft(Subkomponente) ein TIdTCPServer-Objekt hat. Wie kann ich jetzt dieser Subkomponente eine von mir definierte Ereignisbehandlungsroutine zuweisen?

Das TIdTCPServer-Objekt hat ja das Ereignis OnExecute.
Ich will jetzt, dass wenn das TIdTCPServer-Objekt meiner Komponente zugewiesen wird bei OnExecute eine Funktion meiner Komponente ausführt. Ich weiß, dass es gehen würde, wenn ich beides in ein Datenmodul packen würde und das händisch machen würde und dann das Ding ableiten würde. Aber ich will das alles gerne in einer Komponente haben. Außerdem will ich nix von TIdTCPServer ableiten, weil ja in Zukunft die 10er Version rauskommt und dann müsste ich evtl alles wieder umbauen.

Habt ihr ne Idee?