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