Oops, I did not see your answer. Thanks Michael. My original bug was that I did:
MyThread = class(TThread) ... procedure OnTerminate ; ... It was not working, of course because OnTerminate is a procedure of object: procedure OnTerminate(sender: Tobject); ---> This solve all. Fre;D ----- Many thanks ;-) -- View this message in context: http://free-pascal-general.1045716.n5.nabble.com/TThread-OnTerminate-tp5727888p5727909.html Sent from the Free Pascal - General mailing list archive at Nabble.com. _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal