gS7 发表于 2022-7-6 06:45:20

文字样式

早上好Cad导师
 
如何在Visual Lisp方法中搜索现有的文本样式名称
 
Autolisp中的示例
 
(如果(不是(Tblsearch“STYLE”“Mystyle”))
(程序
.........
)
)

Tharwat 发表于 2022-7-6 07:23:20


(vl-catch-all-error-p
(vl-catch-all-apply
   'vla-item
   (list (vla-get-textstyles
       (vla-get-ActiveDocument (vlax-get-acad-object))
   )
   "Test"
   )
)
)

gS7 发表于 2022-7-6 07:37:58

非常感谢Tharwat

Tharwat 发表于 2022-7-6 07:51:57

 
不客气。
页: [1]
查看完整版本: 文字样式