Source position: msewidgets.pas line 31
type sizeeventty = procedure(
const sender: tobject;
var asize: sizety
) of object;