明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
分享 自定义菜单的自动加载
Gu_xl 2014-6-9 12:53
AutoLoadMenuPop.LSP AutoLoadMenuPop.LSP 本源代码由 Gu_xl 编写发布! 联系方式: Email: Gu_xl@sohu.com ;;程序功能:自动添加菜单项 By Gu_xl 明经通道 ;;菜单加载测试测试 ( defun c:tt ( / items items1 ) ;;'((标签 命令 帮助字串 次级菜单项)) 表为菜单 ...
4010 次阅读|4 个评论 热度 11
分享 多选物体绘制包围框
Gu_xl 2014-5-13 09:17
MBox.LSP MBox.LSP 本源代码由 Gu_xl 编写发布! 联系方式: Email: Gu_xl@sohu.com ;;框选物体画框 By Gu_xl 明经通道 2014.05.12 ( defun c:mBox ( / BOX INTERSECT RECTANG SS N L A L1 FLAG B C ) ( defun box ( e / p1 p2 p3 p4 obj ) ...
3584 次阅读|5 个评论 热度 16
分享 mapcar和foreach笔记
77077 2014-5-8 17:06
语法 (mapcar function list1 ... listn) 功能及参数 此函数将 list1 到 listn 当做 function 的参数, 并返回其结果。不过 list 的数目必须符合 function 所需要的数目。 范例 (setq a 10 b 20 c 30) (mapcar '1+ (list a b c)) & ...
1137 次阅读|0 个评论 热度 2
分享 CFileFind用法
Gu_xl 2014-4-15 09:38
1、CFileFind类的声明文件保存在afx.h头文件中。 2、该类的实现的功能:执行本地文件的查找(查找某个具体的文件,查找某类文件x*.x*,查找所有文件*.*) 3、CFileFind类是CGopherFileFind和CFtpFileFind类的基类。 4、CFileFind类的构造函数::CFileFind()和关闭函数::Close()我会成对使用。 5、CFileFind类的成员函数我根据 ...
1456 次阅读|1 个评论 热度 1
分享 用arx方法创建南方CASS的高程点
Gu_xl 2014-4-15 09:06
//By Gu_xl // AcGePoint3d insPt 插入点 // double scale 图块比例,1:1000比例尺 scale = 1.0 // AcDbObjectId objId 返回的高程点ID // double height 标注的高程值 ,默认 = -9999.0,高程值采用insPt的Z值 Acad::ErrorStatus CreateGC200(AcDbDatabase *pDb,AcGePoint3d insPt,double scale,AcDbObjectId ...
2800 次阅读|1 个评论 热度 6
分享 CStdioFile的用法
Gu_xl 2014-4-15 09:02
关于CStdioFile CStdioFile继承自CFile,一个CStdioFile 对象代表一个用运行时函数fopen 打开的C 运行时流式文件。 流式文件是被缓冲的,而且可以以文本方式(缺省)或二进制方式打开。文本方式提供对硬回车—换行符对的特殊处理。当你将一个换行符(0x0A)写入一个文本方式的CStdioFile 对象时,字节对(0x0D,0x0A)被 ...
2253 次阅读|0 个评论
分享 把常用的几个单行文本程序放到一起
crazylsp 2014-3-19 21:07
;输入整数手工修改单行文本开头的数字 (defun c:tt() (while(setq stn(car(entsel))) (setq num (getint"输入整数") stnn (entget stn) contt(cdr(assoc 1 stnn)) ...
1682 次阅读|0 个评论 热度 2
分享 按弦高限差值回返曲线拟合样本点
Gu_xl 2014-3-12 10:04
Gxl-GetSamplet.LSP Gxl-GetSamplet.LSP 本源代码由 Gu_xl 编写发布! 联系方式: Email: Gu_xl@sohu.com ;;(gxl-GetSamplet CURVE d) 按弦高返回曲线拟合样本点 ;;参数 curve = 曲线图元名/对象名 ;; d = 弦高限差值 ;; By Gu_xl 明经通道,2015.04.01修正了SPLIN ...
5007 次阅读|7 个评论 热度 19
分享 完整代码下载地址
风树 2014-3-6 14:19
http://bbs.mjtd.com/thread-108960-1-1.html 没事可看看: Acm之家( http://www.acmerblog.com/)
1300 次阅读|0 个评论
分享 text文字头尾除空格,文字位置保持不动
Gu_xl 2014-3-4 14:13
;;text文字头尾除空格,文字位置保持不动 (defun c:tt (/ LLPT SC P1 P2 DOC E) (defun llpt (E / ENX B R L N M P) (setq enx (entget e)) (setq b (cdr (assoc 10 enx)) r (cdr (assoc 50 enx)) l (textbox enx) ...
1740 次阅读|1 个评论 热度 6

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-3-29 14:48 , Processed in 0.131748 second(s), 8 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

返回顶部