Callback oder sonstige Methode

[Pluto]

noch ne kleine Ergänzung:

@Rollstuhlfahrer:
Erstmal Dank für den auführlichen Code.
Der constructor Create in Unit2 mit dem zusätzlichen Parameter Test: TTest hat den Nachteil
dass inherited einen Fehler erzeugt. (Der constructor von TControl ist dazu nicht kompatibel)
Besser ist es den Parameter in Create wegzulassen und die Variable FTest über eine
Property Test im Object TCBTest zu übergeben.

Ihr dürft alle über mich lachen:
Genau so hatte ich bei meinen "Experimenten" angefangen. Irgend ein Tippfehler führte mich dann
über nicht verstandene Compilerfehlermeldungen in die Irre. Als ich garnicht mehr weiter kam, habe
ich hier gepostet und ihr habt mich dann wieder auf den richtigen Pfad zurückgeführt.