Source position: mseglob.pas line 71
type objectlinkeventty = procedure(
const sender: tobject;
const event: objecteventty
) of object;