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