anchor.diff:      MainMenu: TfpgMenuBar;
       mnuFile: TfpgPopupMenu;
       {@VFD_HEAD_END: MainForm}
  +    miAdd: TfpgMenuItem;
  +    procedure CommandHandler(Sender: TObject);
  +  public
       procedure AfterCreate; override;
     end;
   
  
positive.code:   Name := 'MainForm';
    SetPosition(293, 236, 284, 254);
    WindowTitle := 'Command Interface Test';
    WindowPosition := wpScreenCenter;
  
    btnAdd := TfpgButton.Create(self);
    with btnAdd do
  
negative.code: interface
  
  uses
    SysUtils,
    Classes,
    fpg_base,
    fpg_main,
    fpg_form,
    fpg_button,
    fpg_memo,
    fpg_menu;
  
  type
  
    TMainForm = class(TfpgForm)
    private
      {@VFD_HEAD_BEGIN: MainForm}
      btnAdd: TfpgButton;
      memName1: TfpgMemo;
  