Source position: msegui.pas line 3183
type setwidgetintegerty = procedure(
const awidget: twidget;
const avalue: Integer
);