liucheng2028825 发表于 2020-5-14 11:46:55

请问在表格单元格里插入块用什么lisp语句?




请问在表格单元格里插入块用什么lisp语句?

lisperado 发表于 2020-5-15 08:03:23

http://bbs.mjtd.com/thread-181516-1-1.html

渠辉 发表于 2021-7-9 11:51:54

(defun Table:setblock (tb row column blockname)
(vla-setblocktablerecordid
    tb
    row
    colomn
    (vla-get-objectid (vla-item (vla-get-blocks(vla-get-activedocument (vlax-get-acad-object))) blockname)):vlax-true)
    ;;或(vla-get-objectid (vlax-ename->vla-object(cdr (assoc 330(entget (tblobjname "block" blk)))))):vlax-true)
)
页: [1]
查看完整版本: 请问在表格单元格里插入块用什么lisp语句?