Source position: systhreadsgroup.pas line 51
type TSysThreadTerminateEvent = procedure(
Sender: TObject;
var Data: Pointer
) of object;