Source position: lcltype.pp line 2424
type FontEnumExProc = function(
Control: TControl;
Float: Boolean
):LongInt;