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