Source position: msewidgets.pas line 1254
type fontheightdeltaeventty = procedure(
const sender: tobject;
var delta: Integer
) of object;