如何使用:vlax put属性
大家好,我有一份菜单。cui文件。在(menucmd“p14=+mymenu.POP01”)之后,我在菜单栏中看不到菜单。可能问题是设置为false。这就是开始编写下一个代码的原因:
(defun c:go()(vl load com)(setq menu list nil)(setq acad(vlax get acad object))(setq mgs(vla get Menugroups acad))(setq c(vla get count mgs))(setq n 0)(重复c(setq menu(vlax invoke method mgs“Item”n))(setq menu list(cons menu list))(setq n(+1 n))(setq pops(vla get menu(nth 1 menu list))(setq pops(vlax invoke method pops“Item”0))(setq status(vlax get property pop‘OnMenuBar))(vlax-property-available-p pop‘OnMenuBar)(vlax put property pop‘OnMenuBar:vlax true);
页:
[1]