2013-11-12 明经 AutoLISP 编程②(177027547) 群聊记录：(cons (car '(0 "text")) (ca

明经快报 · 发表于 2013-11-12 08:41:12

[NJZX05]剑无锋 08:41:12

(cons (car '(0 "text")) (cadr '(0 "text")))

明经快报 · 发表于 2013-11-12 09:40:04

[lijiao]仰天长啸 09:40:04

(setq a '(0 "text"))
(cons (car a) (cadr a))

明经快报 · 发表于 2013-11-12 09:53:13

梅花 09:53:13

是表扬我的吗，谢谢

明经快报 · 发表于 2013-11-12 10:10:17

梅花 10:10:17

为什么是(0 "text")->'(0 . "TEXT") 说明一下好吗

明经快报 · 发表于 2013-11-12 19:30:10

[snigefqb][snigefqb]晨曦 19:30:10

(entmake
  (list    '(0 . "LWPOLYLINE")
    '(102 . "{ACAD_REACTORS")
    '(102 . "}")
    '(100 . "AcDbEntity")
    '(67 . 0)
    '(410 . "Model")
    '(43 . 0.3)
    '(8 . "SXSS")
    '(6 . "CONTINUOUS")
    '(100 . "AcDbPolyline")
    '(90 . 16)
    '(10 501626.0 3.23947e+006)
    '(10 501644.0 3.23967e+006)
    '(10 501673.0 3.23969e+006)
    (LIST -3 (LIST "south" (CONS 1000 "183101")) ;_ 结束LIST
          ) ;_ 结束LIST    )                ;
  )
)

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

[LISP群(2)] 2013-11-12 明经 AutoLISP 编程②(177027547) 群聊记录：(cons (car '(0 "text")) (ca

相关帖子