Source position: msecolordialog.pas line 27
type coloreventty = procedure(
const sender: tobject;
const avalue: colorty
) of object;