pdms增加工具栏toolbar创建方法

dodo

我们想做一个类似下图的工具菜单(toolbar)，11.6以后版本工具条创建：

首先我们先需要做图标

图标的格式为16X16像素的png格式的图片

可以自己制作，也可以下载一个图片，推荐到https://www.iconfinder.com寻找图标图片

直接上干货，细节不是很明白！ 如果是懒人，直接看最后的！

1.  到PDMSEXE安装路径下的\PDMSUI\des\addins下创建命名为xptools的文件，没有后缀。内容为：

1. # ----------------------------------------------------------------------
   
2. #  File:            xptools-toolbar
   
3. #  Module:          design
   
4. #  Author:          www.3d-sharp.com
   
5. #  Created:         2014年10月21日14:19:00
   
6. #  Description:     瞎扑程序
   
7. # ----------------------------------------------------------------------
   
8. name: xptools
   
9. showOnMenu: False
   
10. object: xptools
    
11. title: xptools

复制代码

2．对象定义在PDMSEXE安装路径下的\PMLLIB\下创建一个文件夹xptool，然后新建一个xptools.pmlobj文件。同时把图标文件放到文件夹中：

xptools.pmlobj文件代码如下

1. define object xptools
   
2. endobject
   
3. --------------------------------------------------------------------------
   
4. define method .modifyForm()
   
5.   !this.xptoolsbars()
   
6. endmethod
   
7. ------------------------------------------------------------------------
   
8. define method .modifyMenus()
   
9. !this.barMenu()
   
10. !this.Menus()
    
11. endmethod
    
12. 
    
13. define method .barMenus()
    
14. !bmenu = object Appbarmenu()
    
15. !bmenu.add(|xptools|,'xptools')
    
16. !!appmenucntrl.addBarMenu(!bmenu,'DES')
    
17. endmethod
    
18. 
    
19. define method .xptoolsbars()
    
20. frame.xptoolsbar toolbar '3dsharp toolbar'
    
21.   !pixmap = !!pml.getPathname('csharp.png')
    
22.     button .csharpL tooltip 'csharp' pixmap /$!<pixmap> width 16 height 16 callback 'Q ATT '
    
23. 
    
24.   !pixmap = !!pml.getPathname('move.png')
    
25.     button .moveL tooltip 'move' pixmap /$!<pixmap> width 16 height 16 callback 'Q ATT'
    
26. 
    
27.   !pixmap = !!pml.getPathname('pipe.png')
    
28.     button .pipeL tooltip 'pipe' pixmap /$!<pixmap> width 16 height 16 callback 'show !!xp'
    
29. 
    
30.   !pixmap = !!pml.getPathname('run.png')
    
31.     button .runL tooltip 'run' pixmap /$!<pixmap> width 16 height 16 callback 'show !!xp'
    
32.    
    
33.   !pixmap = !!pml.getPathname('apply.png')
    
34.     button .applyL tooltip 'apply' pixmap /$!<pixmap> width 16 height 16 callback 'show !!xp'
    
35. 
    
36.   !pixmap = !!pml.getPathname('send.png')
    
37.     button .sendL tooltip 'send' pixmap /$!<pixmap> width 16 height 16 callback 'show !!xp'
    
38. exit
    
39. !!appTbarcntrl.addToolBar('xptoolsbar','PIPE')
    
40. !!appTbarcntrl.addToolBar('xptoolsbar','EQUI')
    
41. !!appTbarcntrl.addToolBar('xptoolsbar','STRU')
    
42. !!appTbarcntrl.addToolBar('xptoolsbar','GEN')
    
43. endmethod
    

复制代码

3. 按照上面要求后，进入pdms软件输入PML REHASH ALL即可完成工具条的创建

            

4. 我们再增加一个轴网显示的按钮（2014年10月23日）

    A.先把，markgrid.mac文件拷贝到xptools文件夹中,把图标文件gridline16.png图标拷贝到\PMLLIB\xptool\png文件夹中

    B.然后在xptools.pmlobj增加下面代码

1.   !pixmap = !!pml.getPathname('gridline16.png')
   
2.     button .gridL tooltip 'gridline16.png' pixmap /$!<pixmap> width 16 height 16 callback '$m %pmllib%\xptool\markgrid.mac'

复制代码

5.功能展示  进入pdms后如果报错，输入pml rehash all 只有有命令栏的地方都可以输入！

   
  选中轴网相关层次，点击“G”按钮，轴网显示，再次点击，轴网消失！ 成功！

   
6.懒人请直接下载附件包
  双击EXE文件，浏览到pdms安装路径

   
  进入pdms程序 pml rehash all 刷新程序
  如果报错，输入pml rehash all 只有有命令栏的地方都可以输入！  然后重新进design
  可以尝试在这个命令栏位置直接输入design命令进入

xzzwin88

挺好！很详细，而且这个给了我做菜单栏的提示。
另外modifyMenus()和barMenus()这两个方法没用上，完全可以删了。

atelasi

顶起，学习中。。。

admin

xzzwin88 发表于 2014-10-21 16:44
挺好！很详细，而且这个给了我做菜单栏的提示。
另外modifyMenus()和barMenus()这两个方法没用上，完全可 ...

以后用！

renquanwen

谢谢楼主的无私，学习中

慵懒的猫117

正好要学习 谢谢楼主了

pandaabc51

感谢分享，学习了

come16

用工具栏自定义今天刚在别的论坛看到，马上准备尝试一下

lin005

谢谢！可以试试！

碳钢调节阀

好东西，果断试一试