Lee Mac 发表于 2022-7-6 13:21:02

另一种方法是避免命令行调用：
 

(defun PGEMenu ()
(vl-load-com)
(or (menugroup "PGE_CUI")
   (and (findfile "W:\\AutoCAD\\PGE_CUI\\PGE_CUI.cui")
          (vla-load
            (vla-get-MenuGroups
            (vlax-get-acad-object)) "W:\\AutoCAD\\PGE_CUI\\PGE_CUI.cui")))

(and (menugroup "PGE_CUI")
      (menucmd "p30=+PGE_CUI.POP1")))

(PGEMenu)

alanjt 发表于 2022-7-6 13:22:25

 
当然，还有vla方法。可悲的是，早在我开始使用VLisp之前，我就已经把这些放在一起了。这是我写这段代码以来第一次看到它。

AQucsaiJr 发表于 2022-7-6 13:26:33

该死的李。。。。。一旦我开始工作，你就会加入一个不同的版本。。。英雄联盟
谢谢你们的帮助。

Lee Mac 发表于 2022-7-6 13:34:28

 
......
页: 1 [2]
查看完整版本: 网络CUI