[LISP程序]：AutoLISP & DCL精华宝典-整合应用篇

lulusteven · 发表于 2005-9-11 12:11:58

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

AutoLISP & DCL精华宝典-整合应用篇
(defun c:viewdcl()
(if (null dcl_pt)
   (setq dcl_pt '(-1 -1))
)
(setq dcl_file (getfiled "开启 DCL 档案" "" "DCL" 2))
(princ "DCL 档案名=>")(princ dcl_file)
(setq dia_name (getstring "\nDialog 交谈框名=>"))
(if (= dia_name "")
   (setq dia_name dcl_file)
)
(setq dcl_id (load_dialog dcl_file))
(new_dialog dia_name dcl_id)
(action_tile "accept" "(setq dcl_pt (done_dialog 1))")
(action_tile "cancel" "(done_dialog 0)")
(setq dd(start_dialog))
(cond ((= dd 1)(princ "\n确定<OK>!!!"))
   ((= dd 0)(princ "\n取消<Cancel>!!!"))
)
(prin1)
)
(prompt "*****VIEWDCL 预览交谈框设计*****IC3 AutoCAD技术中心*****")
(prin1)

hyx_lyn · 发表于 2005-9-11 15:55:26

楼主有没有整合篇的电子书或是程序集可以提供

让大家也多个学习的机会

先谢了

逐月飞鸿 · 发表于 2005-9-12 08:09:13

AutoLISP & DCL精华宝典-整合应用篇
这个东西是基础篇里面的一个程序……

xshrimp · 发表于 2005-9-14 20:42:02

文不对题,晃点!!

XWT670530 · 发表于 2005-9-14 23:01:38

一楼的主要目的是为了试着发贴挣币吧???

yy5heng · 发表于 2005-9-14 23:07:21

不会是做噱头吧，没有这本书呀。

lcw0002003 · 发表于 2006-12-11 09:51:20

没有书啊
空欢喜

firstintimate · 发表于 2006-12-11 10:22:58

有这本书,不过是在台湾出版的,大陆只有铁道出版社引进的基础版,标题党

gccghl · 发表于 2006-12-11 14:58:00

文不对题，搞了半天并没有书，纯粹噱头。

phoenixdjq · 发表于 2006-12-11 15:10:50

楼主忽悠人，不厚道
我买到过一本基础版的书
但是没有电子版的

czxue123000 · 发表于 2006-12-11 17:49:34

谁有ＣＡＤＶＢＡ书啊？

ylapp · 发表于 2006-12-12 18:08:44

很想学学

账号		自动登录	找回密码
密码			立即注册

[LISP程序]：AutoLISP & DCL精华宝典-整合应用篇

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子