Source position: pscanner.pp line 601
type TCEEvalFunctionEvent = function(
Sender: TCondDirectiveEvaluator;
Name: string;
Param: string;
out Value: string
):Boolean of object;