anchor.diff:      AddMenuItem('Quit', 'Ctrl+Q', @miQuitClick);
     end;
   
  +  mnuEdit := TfpgPopupMenu.Create(self);
  +  with mnuEdit do
  +  begin
  +    Name := 'mnuEdit';
  +    SetPosition(340, 44, 120, 20);
  +    AddMenuItem('Cut', 'Ctrl+X', @miCutClicked);
  +    AddMenuItem('Copy', 'Ctrl+C', @miCopyClicked);
  +    AddMenuItem('Paste', 'Ctrl+V', @miPasteClicked);
  +  end;
  +
     mnuSearch := TfpgPopupMenu.Create(self);
     with mnuSearch do
     begin
       Name := 'mnuSearch';
  -    SetPosition(320, 25, 120, 20);
  +    SetPosition(340, 25, 120, 20);
       AddMenuItem('Find...', 'Ctrl+F', @miFindClick);
       AddMenuItem('Find next', 'F3', @miFindNextClick);
       AddMenuItem('Replace', 'Ctrl+R', nil).Enabled := False;
  
positive.code:     mnuSearch: TfpgPopupMenu;
      memEditor: TfpgTextEdit;
      btnGO: TfpgButton;
      {@VFD_HEAD_END: MainFrom}
      FTextToFind: TfpgString;
      FFindOptions: TfpgFindOptions;
  
negative.code: begin
    {@VFD_BODY_BEGIN: MainFrom}
    Name := 'MainFrom';
    SetPosition(326, 207, 717, 410);
    WindowTitle := 'fpGUI nanoedit';
    Hint := '';
    WindowPosition := wpScreenCenter;
  