Source position: IdThreadComponent.pas line 100
type TIdExceptionThreadComponentEventEx = procedure(
Sender: TIdThreadComponent;
AException: Exception;
var VHandled: Boolean
) of object;