Source position: msecolordialog.pas line 139
procedure tcolordialogfo.hueonsetvalue(
const sender: TObject;
var avalue: realty;
var accept: Boolean
);