是的,我记得有一天我第一次意识到这一点时,真的很困惑。我认为是这句话帮助了我 我在旧文件中对此有一个问题,我刚刚写了一个反应堆,当我切换到纸质空间时,它会将psltscale设置为1。
我回家后会把它寄出去。 干得好。无论何时切换到布局,它都会将psltscale设置为1
(defun ChangedLayout (reactor layout / )
(if (/= (nth 0 layout) "Model")
(setvar "psltscale" 1)
);if
);defun
(if
(not *LayoutLTS*)
(setq *LayoutLTS*
(VLR-Miscellaneous-Reactor nil '((:VLR-layoutSwitched . ChangedLayout)))
);setq
);if
好的,我很感兴趣-作为一个完整的LISP新手,reator到底是什么,你如何使用它们?
抱歉,如果我正在劫持线程
谢谢 这里有一个很好的解释和例子
http://www.afralisp.net/vl/reactors1.htm
男孩,我知道那种感觉吗,我打开一幅画,看了看,想尖叫,介意我用你的Lisp程序吗?
从AutoCAD帮助:
vlr lisp反应堆
构造一个编辑器反应器对象,通知LISP事件
(vlr lisp反应堆数据回调)
论据
数据与反应堆对象关联的任何AutoLISP数据;否则,如果没有数据,则为零。
回调以下形式的配对列表:
(事件名称.回调函数)
其中,事件名称是下表“Lisp reactor events”中列出的符号之一,回调函数是表示事件触发时要调用的函数的符号。每个回调函数接受两个参数:
reactor_对象 调用回调函数的VLR对象。
列表 与特定事件关联的额外数据元素的列表。此列表中特定事件的内容显示在Lisp reactor callback data表中。
返回值
reactor\u对象参数。
Lisp反应堆事件
事件名称
描述
:vlr lispWillStart
要计算AutoLISP表达式。
:vlr lispEnded
AutoLISP表达式的计算已完成。
:vlr LISP取消
已取消对AutoLISP表达式的求值。
Lisp反应堆回调数据
名称
列表长度
参数
:vlr lispEnded
:vlr LISP取消
0
:vlr lispWillStart
1.
包含要计算的AutoLISP表达式第一行的字符串。 加油,伙计
我必须写下这件事,我厌倦了老板看着我正在修改的旧计划集,他会说的第一句话是“所有的行都发生了什么,我以为有些应该被打破?”
每次,这只是一个修复psltscale的问题。我从零开始的新项目似乎从来没有问题,只是旧项目。
页:
1
[2]