baoyizhu 发表于 2020-8-18 23:38:24

求高手告知图层说明的组码是什么？没查到

如题，我查了些资料没查到




Bao_lai 发表于 2020-8-18 23:55:33

(vlax-get-property (vlax-ename->vla-object(tblobjname "layer" "你的图层名称")) "Description")
这个图层说明的属性是 Description，试试看。

maiko 发表于 2020-8-19 08:05:17

扩展数据组码的1000

烟盒迷唇 发表于 2020-8-19 08:29:41

默认组码8就是图层的了。

陈伟 发表于 2020-8-19 08:32:22

(if (not (tblsearch "layer" layer ))
      (progn   (command "layer" "new" "TC填充图案边界线" "s" "TC填充图案边界线" "C" 231 "" "L" "Continuous" "" "P" "N" "" "LW" 0"" "") ));新建图层




LW就是线宽

baoyizhu 发表于 2020-8-19 13:22:27

我的意思是用cons赋值的方式给传递给图层说明
比如下面这样
   (cons 62 7)
62是颜色的组码
图层说明的组码是多少没查到

start4444 发表于 2020-8-19 17:16:50

沙发楼已经给你答案了，为什么一定要组码，你要干嘛？
提取：(vlax-get-property (vlax-ename->vla-object(tblobjname "layer" "你的图层名称")) "Description")
赋值：(vlax-put-property (vlax-ename->vla-object(tblobjname "layer" "你的图层名称")) "Description" "你的图层说明")

baoyizhu 发表于 2020-8-19 21:15:50

start4444 发表于 2020-8-19 17:16
沙发楼已经给你答案了，为什么一定要组码，你要干嘛？
提取：(vlax-get-property (vlax-ename->vla-object ...

可能是强迫症，因为我一个程序其它图层变量都是用组码赋值的;P

cds15980954301 发表于 2020-8-22 14:56:38

;;图层的组码：0类型，100子类数据标记
((0 . "LAYER")(100 . "AcDbSymbolTableRecord")(100 . "AcDbLayerTableRecord")
(2 . "BOU")(70 . 0)(62 . 7)(6 . "Continuous")(290 . 1)(370 . 50))
;;2图层名，62颜色，6线型，370线宽，290打印标记为0时不打印此图层
;;70标准标记1=冻结图层，2=默认情况下在新视口中冻结图层，4=锁定图层

clinber 发表于 2020-8-25 14:56:50

命令: (entget (tblobjname "layer" "0S-B-TEXT") (list "*"))
((-1 . <图元名: 7ff4a5906010>) (0 . "LAYER") (5 . "1A1") (102 . "{ACAD_XDICTIONARY") (360 . <图元名: 7ff4a5906020>) (102 . "}") (330 . <图元名: 7ff4a5903990>) (100 . "AcDbSymbolTableRecord") (100 . "AcDbLayerTableRecord") (2 . "0S-B-TEXT") (70 . 0) (62 . 255) (6 . "Continuous") (290 . 1) (370 . -3) (390 . <图元名: 7ff4a5903890>) (347 . <图元名: 7ff4a59038c0>) (348 . <图元名: 0>) (-3 ("_LayerManage" (1070 . 0) (1070 . 0) (1070 . 0)) ("AcAecLayerStandard" (1000 . "") (1000 . "梁的截面标注及标高标注"))))

1000组码，扩展数据
页: [1] 2
查看完整版本: 求高手告知图层说明的组码是什么？没查到