Neuere Delphis haben dafür schon was und über die Generics macht'a noch mehr Spaß.
Irgendwo in der
DP gibt es zwar auch schon ferige Klassen,
aber du kannst es dir auch selber machen.
- einen Event-Typen deklarieren, so ala TNotifyMethod
- TThread ableiten
- Create überladen und den Event-Typ als Parameter
- das Event speichern (dafür ein Feld in der Thread-Klasse anlegen)
- den Thread im Create "nicht" suspended erstellen
- Execute wurde natürlich überschrieben und darin wird das Event aufgerufen