taoyi0727 发表于 2019-11-5 21:13:07

工具栏靠边请教

本帖最后由 taoyi0727 于 2019-11-5 21:14 编辑

(setq Toolbars (vla-get-Toolbars (vla-Item (Vla-Get-MenuGroups (Vlax-Get-Acad-Object)) 0)))
(vlax-for item Toolbars
      (if (= (vla-get-Name item) "标注")
                (setq obj item)
      )
)
(vlax-invoke-method obj 'DockStatus acToolbarDockBottom)
acToolbarDockTop
acToolbarDockBottom
acToolbarDockLeft
acToolbarDockRight
acToolbarFloating

自己查资料写出来的,就是不对不知道怎么改,请教下
就是想把指定工具栏固定在指定的位置

lijiao 发表于 2019-11-5 21:13:08

(vla-Dock obj acToolbarDockBottom）

taoyi0727 发表于 2019-11-6 21:11:55

lijiao 发表于 2019-11-5 21:13
(vla-Dock obj acToolbarDockBottom）

谢谢
请问如果顶上有2排工具栏,用acToolbarDockTop,就会把原来顶上工具条的位置向后移动
有什么办法能把工具栏固定在第几排第几个工具栏?

taoyi0727 发表于 2019-11-6 23:24:49

vla-put-Top
vla-put-Left
视乎没有用,什么反应都没有
页: [1]
查看完整版本: 工具栏靠边请教