代码改变世界

AutoCADDCL对话框设计示例四

2011-04-16 14:16 by 精诚所至 金石为开, 329 阅读, 0 推荐, 收藏, 编辑
摘要:AutoCADDCL对话框设计示例四,代码如下。 dcl:dialog { label = "第四个DCL对话框" ; :text { alignment = centered ; label = "这是一个文本框" ; } :row { :e... 阅读全文

AutoCADDCL对话框设计示例三

2011-04-16 14:07 by 精诚所至 金石为开, 379 阅读, 0 推荐, 收藏, 编辑
摘要:AutoCADDCL对话框设计示例三,代码如下。 dcl:dialog { label = "第三个DCL对话框" ; :text { alignment = centered ; label = "这是文本框" ; } :edit_box { ... 阅读全文

AutoCADDCL对话框设计示例二

2011-04-16 13:59 by 精诚所至 金石为开, 279 阅读, 0 推荐, 收藏, 编辑
摘要:AutoCADDCL对话框设计示例二,代码如下。 dcl:dialog { label = "第二个DCL对话框" ; :text { alignment = centered ; value = "这是一个文本框!" ; } spacer_1; ok... 阅读全文

AutoCADDCL对话框设计示例一

2011-04-16 13:55 by 精诚所至 金石为开, 388 阅读, 0 推荐, 收藏, 编辑
摘要:AutoCADDCL对话框设计示例,代码如下。 firstDCL:dialog { label = "第一个DCL设计" ; :text { label = "这是一个文本" ; } ok_only;} 代码完。 阅读全文

黑暗处生活在出没

2011-04-15 09:15 by 精诚所至 金石为开, 185 阅读, 0 推荐, 收藏, 编辑
摘要: 阅读全文

别向这个操蛋的世界投降

2011-04-14 14:14 by 精诚所至 金石为开, 329 阅读, 0 推荐, 收藏, 编辑
摘要: 阅读全文

黑白电影

2011-04-13 22:46 by 精诚所至 金石为开, 176 阅读, 0 推荐, 收藏, 编辑
摘要: 阅读全文

恋恋风尘

2011-04-13 21:07 by 精诚所至 金石为开, 179 阅读, 0 推荐, 收藏, 编辑
摘要: 阅读全文

黑洞

2011-04-13 18:23 by 精诚所至 金石为开, 213 阅读, 0 推荐, 收藏, 编辑
摘要: 阅读全文

关于性格内向者的10个误解

2011-04-13 16:47 by 精诚所至 金石为开, 267 阅读, 0 推荐, 收藏, 编辑
摘要:我非常幸运的发现了这本《内向者优势——如何在外向的世界中获得成功》的好书,我感觉就好像是有人专门为我们这个罕见的小群体写了一部百科全书一样,它不仅对我的很多怪癖做了解释,还帮助我从一个崭新且积极的角度重新定义了我的整个人生。 毫无疑问,几乎所有认识我的人都会说,“啊哈,你不会到现在才发现你是个性格内向者吧?”,其实这并不是那么简单,问题在于将一些人贴上内向者的标签是一种非常浅显且充满各种常见误解... 阅读全文

AutoLISP查询图元信息

2011-04-11 20:56 by 精诚所至 金石为开, 1295 阅读, 0 推荐, 收藏, 编辑
摘要:AutoLISP查询图元信息,可以查询直线、圆弧、圆、椭圆的相关信息,代码如下。 (defun c:getppt () (setq ss (car (entsel "请选择要查询的图元:"))) (setq ssob (vlax-ename->vla-object ss)) (setq typ (cdr ... 阅读全文

AutoLISP查询直线的相关属性

2011-04-11 17:16 by 精诚所至 金石为开, 653 阅读, 0 推荐, 收藏, 编辑
摘要:AutoLISP查询直线的相关属性,得到直线的起点、终点、长度和角度,代码如下。 (defun c:lppt () (setq ss (car (entsel "\n请选择所要查询的直线:"))) (setq ssob (vlax-ename->vla-object ss)) (Setq len (Vlax-Get ssob 'Lengt... 阅读全文

AutoLISP查询椭圆弧的相关属性

2011-04-11 17:09 by 精诚所至 金石为开, 421 阅读, 0 推荐, 收藏, 编辑
摘要:AutoLISP查询椭圆弧的相关属性,得到椭圆弧的中心、长轴、短轴、周长和面积,代码如下。 (defun c:elcppt () (setq ss (car (entsel "\n请选择所要查询的椭圆弧:"))) (setq ssob (vlax-ename->vla-object ss)) (setq len (vlax-curv... 阅读全文

AutoLISP查询椭圆的相关属性

2011-04-11 17:03 by 精诚所至 金石为开, 362 阅读, 0 推荐, 收藏, 编辑
摘要:AutoLISP查询椭圆的相关属性,包括椭圆的中心、长轴、短轴、周长和面积,代码如下。 (defun c:elppt () (setq ss (car (entsel "\n请选择所要查询的椭圆:"))) (setq ssob (vlax-ename->vla-object ss)) (setq center (vlax-get s... 阅读全文

AutoLISP查询圆弧的相关属性

2011-04-11 16:59 by 精诚所至 金石为开, 548 阅读, 0 推荐, 收藏, 编辑
摘要:AutoLISP查询圆弧的相关属性,得到圆心、半径、长度和面积,代码如下。 (defun c:arcppt () (setq ss (car (entsel "\n请选择所要查询的圆弧:"))) (setq ssob (vlax-ename->vla-object ss)) (Setq center (Vlax-Get ssob '... 阅读全文
上一页 1 ··· 32 33 34 35 36 37 38 39 40 ··· 51 下一页