Source position: mseedit.pas line 249
type buttoneventty = procedure(
const sender: tobject;
var action: buttonactionty;
const buttonindex: Integer
) of object;