修改别人的仿纬地菜单

gaomingabc456 · 发表于 2019-6-15 12:03:00

配置环境 win1064位 vs2017  +  cad2010    1  、人工加载在cad命令栏中输入 Netload 找到  Hello.dll 文件加载    在命令行输入 kaka
  2 、自动加载在C:\Program Files\ 2010\Support文件夹中找到  acad2010.lsp  修改其中的
      (if (not (=  (substr (ver) 1 11) "Visual LISP")) (load "acad2010doc.lsp"))
      ;; Silent load.
      (princ)
   在其中加入
   (if (not (=  (substr (ver) 1 11) "Visual LISP")) (load "acad2010doc.lsp"))
   (COMMAND "NETLOAD"  "E:\\Hello.dll")    ; ; Hello.dll  的路径
   (COMMAND "kaka" )
   ; ; Silent load.
   (princ)
3 、其它版本的.dll文件，请添加其它cad版本的引用
4  、如果添加其它菜单的单击命令，修改
         private void 删除高程ToolStripMenuItem_Click(object sender, EventArgs e)
      {
         Document doc = AcadApp.DocumentManager.MdiActiveDocument;
         doc.SendStringToExecute("_KE ", true, false, true);
      }
   其中的 _KE ，修改成自己的命令，可以是cad内部命令，也可以是自己加载成功的自定义命令

gaomingabc456 · 发表于 2019-9-17 10:31:00

添加相应的using引用
如:using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Drawing;
using System.Data;
using System.Text;
using System.Windows.Forms;
using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.Windows;
using Autodesk.AutoCAD.ApplicationServices;
using AcadApp = Autodesk.AutoCAD.ApplicationServices.Application;