Unit
acCaptionButton

Declaration
type
  TMenuSeparators = set of (seBefore, seAfter);

  TSystemMenu = class(TPersistent)
  public
    constructor Create(aCaptionButton: TCustomCaptionButton);
    destructor Destroy; override;

    procedure CheckMenuItem(Checked: Boolean);
  published
    property ApplyToMenu: Boolean;
    property CaptionString;
    property Position: Word;
    property Separators: TMenuSeparators;
  end;


Description
The TSystemMenu class describes the properties and private methods that required to manage the menu items in the form's system menu.