• autocad.net回退undo与命令行回应cmdecho完美结合


    #if AC2013
    
        [DllImport("accore.dll", CallingConvention = CallingConvention.Cdecl, EntryPoint = "acedCmd")]
    
    #else
    
        [DllImport("acad.exe", CallingConvention = CallingConvention.Cdecl, EntryPoint = "acedCmd")]
    
    #endif
    
        private static extern int acedCmd(System.IntPtr vlist);
    
        [CommandMethod("ClearUndoStack")]
    
        public void ClearUndoStack()
    
        {
    
          // remember the cmdecho
    
          short cmdecho = (short)Application.GetSystemVariable("CMDECHO");
    
          // turn it off
    
          Application.SetSystemVariable("CMDECHO", 0);
    
     
    
          short undoCtl = (short)Application.GetSystemVariable("UNDOCTL");
    
          bool isOn = (undoCtl & 1) == 1;
    
          if (!isOn)
    
            return;
    
     
    
          bool isOneCmd = (undoCtl & 2) == 2;
    
          bool isAuto = (undoCtl & 4) == 4;
    
     
    
          ResultBuffer rb = new ResultBuffer();
    
          // RTSTR = 5005
    
          rb.Add(new TypedValue(5005, "_.UNDO"));
    
          rb.Add(new TypedValue(5005, "_Control"));
    
          rb.Add(new TypedValue(5005, "_None"));
    
          rb.Add(new TypedValue(5005, "_.UNDO"));
    
     
    
          if (isOneCmd)
    
            rb.Add(new TypedValue(5005, "_One"));
    
          else
    
          {
    
            rb.Add(new TypedValue(5005, "_All"));
    
            if (!isAuto)
    
            {
    
              rb.Add(new TypedValue(5005, "_.UNDO"));
    
              rb.Add(new TypedValue(5005, "_Auto"));
    
              rb.Add(new TypedValue(5005, "_Off"));
    
            }
    
          }
    
     
    
          // start the insert command
    
          acedCmd(rb.UnmanagedObject);
    
          // now restore cmdecho
    
          Application.SetSystemVariable("CMDECHO", cmdecho);
    
        }
  • 相关阅读:
    第一天
    在代码层面描述软件的可测试性
    Datax环境搭建
    质量属性中六个常见的属性场景--以淘宝网为例
    01.《架构漫谈》阅读笔记
    我的第一个MVC程序(SpringMVC的环境搭建与实例运用)
    1.15学习进度总结
    1.14学习进度总结
    1.13学习进度总结
    1.12学习进度总结
  • 原文地址:https://www.cnblogs.com/swtool/p/SWTOOL_00017.html
Copyright © 2020-2023  润新知