anchor.diff:    begin
       Name := 'mnuEdit';
       SetPosition(260, 126, 120, 24);
  -    AddMenuItem('Cut', '', nil).Enabled := False;
  -    AddMenuItem('Copy', '', nil).Enabled := False;
  -    AddMenuItem('Paste', '', nil).Enabled := False;
  +//    AddMenuItem('Cut', '', nil).Enabled := False;
  +    AddMenuItem('Copy selected message to clipboard', rsKeyCtrl+'C', @miEditCopy);
  +//    AddMenuItem('Paste', '', nil).Enabled := False;
       AddMenuItem('-', '', nil);
       AddMenuItem('Preferences...', '', nil).Enabled := False;
     end;
  
positive.code: uses
    dateutils
    ,fpg_dialogs
    ;
  
  
  
negative.code:     procedure   ShowMessageWindow;
      procedure   miPauseClicked(Sender: TObject);
      procedure   miFileQuit(Sender: TObject);
      procedure   miEditCopy(Sender: TObject);
      procedure   miHelpAboutFPGui(Sender: TObject);
      procedure   miHelpProductInformation(Sender: TObject);
      procedure   btnClearClicked(Sender: TObject);
  