anchor.diff:    NCmd:= StrToIntDef(SData, 0);
   
     if NCmd>0 then
  -    CurrentEditor.DoCommand(NCmd, cInvokeMenu)
  +    CurrentEditor.DoCommand(NCmd, cInvokeAppToolbar)
     else
     begin
       SetLength(Params, 0);
  
positive.code:   Ed: TATSynEdit;
  begin
    Ed:= (Sender as TMenuItem).Owner as TATSynEdit;
    Ed.DoCommand(cCommand_SelectAll, cInvokeMenu);
  end;
  
  procedure TfmMain.PopupBottomWrapClick(Sender: TObject);
  
negative.code:   F:= FrameOfPopup;
    if F=nil then exit;
  
    F.Editor.DoCommand(cmd_CopyFilenameDir, cInvokeMenuContext);
  end;
  
  procedure TfmMain.mnuTabCopyFullPathClick(Sender: TObject);
  