Source position: graphics.pp line 1981
function ClearXLFDItem(
const LongFontName: ;
Index: Integer
):;