老兄，再深挖一下。
比如命令1我要改成画云线，该如何改啊？
freeok 发表于 2016-10-8 00:26
老兄，再深挖一下。
比如命令1我要改成画云线，该如何改啊？
假设你画云线的命令名是hyx
示例的面板中，有一条是"Func1 命令1"，把改成，然后把[命令1]改成[画云线]。不包括中括号[]。
另外，建议改成的命令名使用完整的命令名，不要使用pgp里自定义的快捷键，省的到时快捷键调整了，还要重新调整面板代码。
lostbalance 发表于 2016-10-8 09:03
假设你画云线的命令名是hyx
示例的面板中，有一条是"Func1 命令1"，把改成，然后把[命令1] ...
感谢兄弟深情回复，非常感谢！
感谢提供源码！
楼主好人。。。。。。。。。
优秀优秀，顶起
请问这个怎么改成点击按钮运行完之后按空格是再次运行上一次的程序而不是再打开面板？
本帖最后由 fangmin723 于 2021-5-17 15:34 编辑
我做的面板
(list
(list
(list '("1bt01" "1bt01") '("1bt02" "1bt02") '("1bt03" "1bt03") '("1bt04" "1bt04"))
(list '("1bt11" "1bt11") '("1bt12" "1bt12") '("1bt13" "1bt13") '("1bt14" "1bt14"))
(list '("1bt21" "1bt21") '("1bt22" "1bt22") '("1bt23" "1bt23") '("1bt24" "1bt24"))
(list '("1bt31" "1bt31") '("1bt32" "1bt32") '("1bt33" "1bt33") '("1bt34" "1bt34"))
(list '("1bt41" "1bt41") '("1bt42" "1bt42") '("1bt43" "1bt43") '("1bt44" "1bt44"))
(list '("1bt51" "1bt51") '("1bt52" "1bt52") '("1bt53" "1bt53") '("1bt54" "1bt54"))
(list '("1bt61" "1bt61") '("1bt62" "1bt62") '("1bt63" "1bt63") '("1bt64" "1bt64"))
(list '("1bt71" "1bt71") '("1bt72" "1bt72") '("1bt73" "1bt73") '("1bt74" "1bt74"))
(list '("1bt81" "1bt81") '("1bt82" "1bt82") '("1bt83" "1bt83") '("1bt84" "1bt84"))
(list '("1bt91" "1bt91") '("1bt92" "1bt92") '("1bt93" "1bt93") '("" "")) ;'("1bt94" "1bt94")
)
(list
(list '("2bt01" "2bt01") '("2bt02" "2bt02") '("2bt03" "2bt03") '("2bt04" "2bt04"))
(list '("2bt11" "2bt11") '("2bt12" "2bt12") '("2bt13" "2bt13") '("2bt14" "2bt14"))
(list '("2bt21" "2bt21") '("2bt22" "2bt22") '("2bt23" "2bt23") '("2bt24" "2bt24"))
(list '("2bt31" "2bt31") '("2bt32" "2bt32") '("2bt33" "2bt33") '("2bt34" "2bt34"))
(list '("2bt41" "2bt41") '("2bt42" "2bt42") '("2bt43" "2bt43") '("2bt44" "2bt44"))
(list '("2bt51" "2bt51") '("2bt52" "2bt52") '("2bt53" "2bt53") '("2bt54" "2bt54"))
(list '("2bt61" "2bt61") '("2bt62" "2bt62") '("2bt63" "2bt63") '("2bt64" "2bt64"))
(list '("2bt71" "2bt71") '("2bt72" "2bt72") '("2bt73" "2bt73") '("2bt74" "2bt74"))
(list '("2bt81" "2bt81") '("2bt82" "2bt82") '("2bt83" "2bt83") '("2bt84" "2bt84"))
(list '("2bt91" "2bt91") '("2bt92" "2bt92") '("2bt93" "2bt93") '("2bt94" "2bt94"))
)
(list
(list '("3bt01" "3bt01") '("3bt02" "3bt02") '("3bt03" "3bt03") '("3bt04" "3bt04"))
(list '("3bt11" "3bt11") '("3bt12" "3bt12") '("3bt13" "3bt13") '("3bt14" "3bt14"))
(list '("3bt21" "3bt21") '("3bt22" "3bt22") '("3bt23" "3bt23") '("3bt24" "3bt24"))
(list '("3bt31" "3bt31") '("3bt32" "3bt32") '("3bt33" "3bt33") '("3bt34" "3bt34"))
(list '("3bt41" "3bt41") '("3bt42" "3bt42") '("3bt43" "3bt43") '("3bt44" "3bt44"))
(list '("3bt51" "3bt51") '("3bt52" "3bt52") '("3bt53" "3bt53") '("3bt54" "3bt54"))
(list '("3bt61" "3bt61") '("3bt62" "3bt62") '("3bt63" "3bt63") '("3bt64" "3bt64"))
(list '("3bt71" "3bt71") '("3bt72" "3bt72") '("3bt73" "3bt73") '("3bt74" "3bt74"))
(list '("3bt81" "3bt81") '("3bt82" "3bt82") '("3bt83" "3bt83") '("3bt84" "3bt84"))
(list '("3bt91" "3bt91") '("3bt92" "3bt92") '("3bt93" "3bt93") '("3bt94" "3bt94"))
)
(list
(list '("4bt01" "4bt01") '("4bt02" "4bt02") '("4bt03" "4bt03") '("4bt04" "4bt04"))
(list '("4bt11" "4bt11") '("4bt12" "4bt12") '("4bt13" "4bt13") '("4bt14" "4bt14"))
(list '("4bt21" "4bt21") '("4bt22" "4bt22") '("4bt23" "4bt23") '("4bt24" "4bt24"))
(list '("4bt31" "4bt31") '("4bt32" "4bt32") '("4bt33" "4bt33") '("4bt34" "4bt34"))
(list '("4bt41" "4bt41") '("4bt42" "4bt42") '("4bt43" "4bt43") '("4bt44" "4bt44"))
(list '("4bt51" "4bt51") '("4bt52" "4bt52") '("4bt53" "4bt53") '("4bt54" "4bt54"))
(list '("4bt61" "4bt61") '("4bt62" "4bt62") '("4bt63" "4bt63") '("4bt64" "4bt64"))
(list '("4bt71" "4bt71") '("4bt72" "4bt72") '("4bt73" "4bt73") '("4bt74" "4bt74"))
(list '("4bt81" "4bt81") '("4bt82" "4bt82") '("4bt83" "4bt83") '("4bt84" "4bt84"))
(list '("4bt91" "4bt91") '("4bt92" "4bt92") '("4bt93" "4bt93") '("4bt94" "4bt94"))
)
(list
(list '("5bt01" "5bt01") '("5bt02" "5bt02") '("5bt03" "5bt03") '("5bt04" "5bt04"))
(list '("5bt11" "5bt11") '("5bt12" "5bt12") '("5bt13" "5bt13") '("5bt14" "5bt14"))
(list '("5bt21" "5bt21") '("5bt22" "5bt22") '("5bt23" "5bt23") '("5bt24" "5bt24"))
(list '("5bt31" "5bt31") '("5bt32" "5bt32") '("5bt33" "5bt33") '("5bt34" "5bt34"))
(list '("5bt41" "5bt41") '("5bt42" "5bt42") '("5bt43" "5bt43") '("5bt44" "5bt44"))
(list '("5bt51" "5bt51") '("5bt52" "5bt52") '("5bt53" "5bt53") '("5bt54" "5bt54"))
(list '("5bt61" "5bt61") '("5bt62" "5bt62") '("5bt63" "5bt63") '("5bt64" "5bt64"))
(list '("5bt71" "5bt71") '("5bt72" "5bt72") '("5bt73" "5bt73") '("5bt74" "5bt74"))
(list '("5bt81" "5bt81") '("5bt82" "5bt82") '("5bt83" "5bt83") '("5bt84" "5bt84"))
(list '("5bt91" "5bt91") '("5bt92" "5bt92") '("5bt93" "5bt93") '("5bt94" "5bt94"))
)
)
fangmin723 发表于 2021-5-17 15:31
我做的面板
哈哈看起来也很不错啊，愿意分享一下吗:lol
我找到解决办法了：(vla-sendcommand (vla-get-ActiveDocument (vlax-get-acad-object)) "**\n")