Source position: pofamilies.pp line 38
type TTestEndEvent = procedure(
const ATestName: string;
const ErrorCount: Integer
) of object;