欢迎加我的QQ群:193522571,一起来讨论、交流!

在autocad.net中加载lisp程序的方法

相信很多人以前在lisp中写过很多程序,那么如果要在.net中去调用写好的lisp程序怎么弄呢?

以下是一个简单的例子: 

using Autodesk.AutoCAD.Windows;
using Autodesk.AutoCAD.Runtime;
using System.Windows.Forms;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.ApplicationServices;
using System;
using System.Collections;
using app = Autodesk.AutoCAD.ApplicationServices.Application;
 
namespace test
{
        [CommandMethod("test")]
        public void test()
        {
            //设置标记并发送PLINE         
            Document curAcadDoc = app.DocumentManager.MdiActiveDocument;
            string lispPath = "d:/1.lsp";
            string loadStr = String.Format("(load \"{0}\")  tttt\n", lispPath);
            curAcadDoc.SendStringToExecute(loadStr, false, false, false);
        }
}

 

以下是lisp中的代码:

(defun c:tttt()

  (alert  "hello world")

)

 

posted @ 2014-03-19 20:57  swtool  阅读(1971)  评论(1编辑  收藏  举报
欢迎加我的QQ群:193522571,一起来讨论、交流!