Source position: msetabs.pas line 344
type movedeventty = procedure(
const sender: tobject;
const curindex: Integer;
const newindex: Integer
) of object;