NewItem

function NewItem(

  const ACaption: string;

  AShortCut: TShortCut;

  AChecked: Boolean;

  TheEnabled: Boolean;

  TheOnClick: TNotifyEvent;

  hCtx: THelpContext;

  const AName: string

):TMenuItem;