Source position: lcltype.pp line 2547
type FontEnumExProc = function(
var ELogFont: TEnumLogFontEx;
var Metric: TNewTextMetricEx;
FontType: LongInt;
Data: PtrInt
):LongInt;