Source position: lcltype.pp line 2421
type FontEnumProc = function(
Control: TControl;
InsertAt: TAlign;
DropCtl: TControl
):LongInt;