2013-08-03 明经 AutoLISP 编程(102918348) 群聊记录：谁有等高线检查点线

明经快报

[逸龙]312205714 18:12:03

(defun C:changecolor (/ ss K)
  (setq ss (ssget) k 0)
  (repeat (sslength ss)
    (vlax-put-property (vlax-ename->vla-object (ssname ss k)) "textcolor" 6)
    (setq k (1+ k))
    )
  )

错误！！

[无痕]午夜咖啡 18:15:45

你得看看ss实体是不是有这个属性

明经快报

[xiaomm250][lisp_](car (entsel)) 18:39:44

[qqimg]201308/{9F219115-3DDB-D360-F032-581E9C37E22C}.jpg[/qqimg]  这个如何用button调用alert来显示edit_box中的内容呢?

明经快报

[xiaomm250][lisp_](car (entsel)) 19:07:46

(get_tile "keyofeditbox"), 这个是必须的吗?

[vormittag]桔子 19:09:11

不用 就变成：
(action_tile 
      "keyofbutton" 
      "(alert (get_tile "
      keyofeditbox 
      "))"  )

这就变成四个参数了

[xiaomm250][lisp_](car (entsel)) 19:12:50

明白了,难怪我不行的

[vormittag]桔子 19:15:55

1、点从上至下排序
2、点从左到右排序

[why1025][7299969]人生 19:18:42

rlst是有点坐标组成的？

明经快报

[why1025][7299969]人生 19:33:20

cadar是什么

[vormittag]桔子 19:35:44

(car (cdr (car x)))

明经快报

[vormittag]桔子 19:54:28

自己不会试么？

10480.8

明经快报

[无痕]午夜咖啡 21:56:40

cdddr

[ZZXXQQ] 21:57:02

cddddr

明经快报

[AMKYUD][AMKYUD]??? 22:25:50

怎样取得前面用vl函数画的vla对象？  entlast?

[pzweng][pzweng]路人 22:27:08

entlast再转换一下

[AMKYUD][AMKYUD]??? 22:27:47

(⊙o⊙)…

怎么弄

[pzweng][pzweng]路人 22:28:48

(vlax-ename->vla-object (entlast))

[AMKYUD][AMKYUD]??? 22:28:57

那我还要vl函数画vla对象是sb吗

[pzweng][pzweng]路人 22:29:26

你得好好看看书

[AMKYUD][AMKYUD]??? 22:29:28

用vl函数画出来的，还不是vla对象吗？

[pzweng][pzweng]路人 22:30:06

(setq vlaobj (vla-add.......))

[AMKYUD][AMKYUD]??? 22:30:39

非常感谢

[pzweng][pzweng]路人 22:38:18

函数

例如