Source position: tiThread.pas line 69
type TtiThreadEventRegular = procedure(
const AThread: TtiThread
);