@oki,
Vielen Dank, es funktioniert!!
p.s. Eine kleine Frage noch (wie gesagt ich bin kein Thread-Profi):
Ist dieser Code auch "Thread-Save", ich meine damit, was passiert in
TMain.OnThreadFinish(Sender : TObject);
wenn mehrere Threads zugleich dieses Ereignis anstoßen (Stichwort: Synchronize)?