Source position: msewidgets.pas line 68
type tabordereventty = procedure(
const sender: ttaborderoverride;
const current: twidget;
const down: Boolean;
var next: twidget
) of object;