Source position: IdComponent.pas line 106
type TWorkEndEvent = procedure(
ASender: TObject;
AWorkMode: TWorkMode
) of object;