Replaces the spacing for a XLFD font descriptor format with a '*' wildcard.
Source position: graphics.pp line 1965
function ClearXLFDPitch(
const LongFontName: string
):string;