本人'；我卡住了，请帮忙。
我陷入困境，找不到解决办法。我正在编写一个带有DCL的lisp，它将绘制tee支持。我的DCL中显示了该列表，但当您选择钢材尺寸时，它不会设置我存储的任何值。
现在，我在程序中只有两种钢尺寸，以尝试简化它。
有人能给我指一下正确的方向吗？
有些地方我肯定不正确
(if userclick
(progn
(setq $COLSIZE$ (fix $COLSIZE$))
(setq $COLSIZE$ (nth $COLSIZE$ column))
(setq $BMSIZE$ (fix $BMSIZE$))
(setq $BMSIZE$ (nth $BMSIZE$ beam))
)
设置变量
(defun info ()
((= $COLSIZE$ "W5X19")
(SETQ COLDEPTH 5.13)
(SETQ COLFLGTHK 0.44)
(SETQ PLTDEPTH 0.75)
(SETQ PLTWIDTH 12.0)
)
用户输入
(set_tile "toselev" "000.000")
(mode_tile "toselev" 0)
(action_tile "toselev" "(setq TOSEL $value)")
Tee_测试。LSP
TPOLE。dcl
你好
您使用了文本属性键的名称，而不是popup_list key属性。
页:
[1]