设为首页收藏本站 CAD论坛 CAD教程 CAD下载明经币充值

切换到宽版

明经CAD社区 › 日志

日志

最新发表的日志| 推荐阅读的日志 | 应用 | 开发 | 插件 | 电脑 | 知识 | 资讯 | 心情 | 生活 | 文学

分享打开指定路径: bloodtempt 2019-5-29 19:22; (defun c:bb() (command "start" "E:\\LQS" )(princ)) (defun c:bb ()(command "shell"(strcat "start " "E:\\LQS"))(princ)) (defun c:bb() (startapp "explorer.exe" "E:\\LQS")(princ)) (defun c:bb()(vl-load-com)(vlax-invoke (vla-GetInterfaceObject (vlax-get-acad-object) "WScript.S ...; 218 次阅读|0 个评论热度 8

分享去除dwg文件右键发布DWF并通过电子邮件发送菜单: 1993063 2019-5-14 15:25; Windows Registry Editor Version 5.00 以上存为注册表.REG文件并导入存为bat文件格式并双击 reg delete "HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\AcShellExtension.AcContextMenuHandler" /f; 12 次阅读|0 个评论

分享显示CAD对话框，并且只显示索引颜色: xgr 2019-2-16 13:24; Kean专题(9)—Object_Properties 显示CAD颜色对话框 http://bbs.mjtd.com/forum.php?mod=viewthreadtid=77587extra=highlight=Transparencypage=2 如果只显示索引颜色的话，需做下列修改： Autodesk.AutoCAD.Windows.ColorDialog cd = new Autodesk.AutoCAD.Windows.ColorDialo ...; 172 次阅读|0 个评论

分享 CHM不能搜索: evayleung 2019-1-13 00:24; regsvr32 hhctrl.ocx regsvr32 itss.dll regsvr32 itircl.dll; 56 次阅读|0 个评论

分享 CAD表格或块属性与Excel的互传工具: xazhji 2019-1-7 11:57; 今天为大家带来一款CAD表格或块属性输出到Excel的工具，也可以在Excel中修改后，更新CAD相关内容。CAD与Excel互联，让修改变得更容易！由于无法上传附件，请在 xazhji.ys168.com 中下载或联系 QQ:461202580，想尝试内测最新更多工具，加群：283014818; 2300 次阅读|1 个评论热度 1

分享高版本CAD 选择的对象超过了设置指定数目的对象时，不显示夹点--解决办法！！！: wayne_myles 2018-12-8 06:33; 选择的对象超过了设置指定数目的对象时，将不显示夹点。需要RE一下, 或者将GRIPOBJLIMIT设置为0，永远显示夹点。; 2087 次阅读|0 个评论热度 3

分享距离高程计算下一点坐标: 13648893846 2018-10-29 22:12; ;; 距离高程计算下一点坐标 ;; (LC:Pt2YZ1 pt dx h) ;; BY 老仓测绘上班记 ;;;(LC:Pt2XY1 pt dx (- h (caddr pt))) ;;;(LC:Pt2YZ1 点距离增量计算点标高横向比例纵向比例) ;;;pt点必须有Z值 (defun LC:Pt2YZ1 (PT DX H HXBL ZXBL) (mapcar '(lambda (x y) (+ x y)) pt (list (* dx (/ 1000.0 HXBL)) ))(* ...; 1803 次阅读|0 个评论

分享读取纬地原始地貌数据转换成点表: 13648893846 2018-10-25 23:12; ;; 读取纬地原始地貌数据转换成点表 ;; (LC:Make-LWPOLYLINE (LC:read-Weft-pts lst (setq pt (getpoint)) (setq hxbl 1000.0) (setq zxbl 1000.0))) ;; BY 老仓测绘上班记 ;;;(setq txt (try-read-txt WeftFILEpath)) ;;; (if (= (car txt) "HINTCAD5.83_HDM_SHUJU") ;;; (setq txt (gxl-removeN ...; 1776 次阅读|1 个评论热度 1

分享二分法根据面积画线，可用于断面图计量人员使用: 13648893846 2018-10-20 21:47; ;; pline,lwpline点坐标表 By 无痕 ;; (LC:WH-vxs (car (entsel))),返回三维点坐标 (defun LC:WH-vxs (e / i v lst) (setq i -1) (while (setq v (vlax-curve-getpointatparam e (setq i (1+ i)))) (setq lst (cons v lst)) ) (reverse ls ...; 1825 次阅读|0 个评论热度 5

分享断面数据点表生成断面清表面积: 13648893846 2018-10-14 22:12; ;; 断面数据点表生成断面清表面积 ;; (LC:Clear-table-area ptlst1 ptlst2 qbhd) ;; BY 老仓测绘上班记 ;;;(setq ptlst1 (LC:WH-vxs (car (entsel"\n 请选择原始地貌线：")))) ;;;(setq ptlst2 (LC:WH-vxs (car (entsel"\n 请选择设计线：")))) ;;;(LC:Make-LWPOLYLINE '((185.938 88.6237 0.0) (201.505 75.1854 0.0) (222 ...; 1654 次阅读|0 个评论热度 1

1 2 345 6 7 8 9 10 ... 93 / 93 页下一页

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

GMT+8, 2023-6-3 23:35 , Processed in 0.138115 second(s), 8 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

返回顶部