社区 › Auto Lisp › 将双线设置为单元格

ziele_o2k 发表于 2022-7-5 15:38:14

将双线设置为单元格

我想将双线设置为表中的特定单元格。
我在试着

(vla-SetGridDoubleLineSpacing TabObj 0 0 (+ acHorzBottom acHorzTop acVertLeft acVertRight) 5)
(vla-SetGridVisibility2 TabObj 0 0 (+ acHorzBottom acHorzTop acVertLeft acVertRight) :vlax-true)
但我犯了个错误。
怎么了？

BIGAL 发表于 2022-7-5 15:56:17

试试下面的方法，没有错误，但也没有双线？

(setq obj (vlax-ename->vla-object (car (entsel "\nPick object"))))
(vla-SetGridDoubleLineSpacing Obj 0 0 (+ acHorzBottom acHorzTop acVertLeft acVertRight) 0.5)
(vla-SetGridVisibility Obj(+ acHorzBottom acHorzTop acVertLeft acVertRight) acHeaderRow:vlax-true)
one at a time works
(vla-SetGridVisibility2 Obj 0 0 acVertRight:vlax-true)

ziele_o2k 发表于 2022-7-5 16:07:07

比格尔，你的代码不起作用。
无论如何，在我的示例中，我想在标题行中设置双线，但我正在搜索适用于表中任何单元格的解决方案。

Roy_043 发表于 2022-7-5 16:25:25

(vla-setgridlinestyle (vlax-ename->vla-object (car (entsel))) 0 0 achorzbottom acgridlinestyledouble)

ziele_o2k 发表于 2022-7-5 16:33:09

谢谢你Roy_043！
(vla-SetGridDoubleLineSpacing TabObj 0 -1 (+ acHorzBottom acHorzTop acVertLeft acVertRight) 5)
(vla-setgridlinestyle TabObj 0 -1 (+ acHorzBottom acHorzTop acVertLeft acVertRight) acgridlinestyledouble)

BIGAL 发表于 2022-7-5 16:43:41

很好Roy_043 Autodesk帮助没有那么有用。

查看完整版本: 将双线设置为单元格