在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")

)

在autocad.net中加载lisp程序的方法,古老的榕树,5-wow.com

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。