Source position: pscanner.pp line 1369
function ExtractFilenameOnly(
const AFileName: string
):string;