Source position: mseact.pas line 115
type actioneventty = procedure(
const sender: tcustomaction
) of object;