PDMS二次开发软件

 找回密码
 注册 有问题进QQ群591484440

QQ登录

只需一步,快速开始

查看: 904|回复: 3

[Pml Macros 工具] 为你的pml程序提供标准windows文件对话框(转)

[复制链接]

签到天数: 11 天

[LV.3]瞎扑签到3级

高级会员

积分
1020

瞎扑会员瞎扑程序员瞎扑元老

发表于 2014-5-5 09:04:54 | 显示全部楼层 |阅读模式
JFileDlg使用说明
                                     李俊
                                 2009-08-15

功能
1. 为你的pml程序提供标准windows文件对话框

安装
2. 用记事本打开“setup.bat”及“uninstall.bat”,将@set pdms_installed_dir=D:\AVEVA\Pdms11.6.SP4\中的路径改为本机PDMS安装路径。
3. 双击运行“setup.bat”

使用
4. 在你自己的pml代码中加入以下代码
   !ObjDlg = object JFileDlg()                                    --创建对话框对象
   !ObjDlg.Filter = 'Text Files(*.txt)|*.txt|All Files(*.*)|*.*'  --定义打开文件对话框文件过滤器[可选]
   !ObjDlg.MultiSelect = false                                    --定义打开文件对话框是否可多选[可选]
   !ObjDlg.InitialDir = 'D:\'                                     --定义打开文件对话框初始目录[可选]
   !FileName = !ObjDlg.OpenFileDlg()                              --显示打开文件对话框并返回选取的文件名

   !ObjDlg.Filter = '*.csv'                                       --定义保存文件对话框文件过滤器[可选]
   !ObjDlg.DefaultFileName = 'Test.csv'                           --定义保存文件对话框默认文件名[可选]
   !FileName = !ObjDlg.SaveFileDlg()                              --显示保存文件对话框并返回选取的文件名

   !FileName = !ObjDlg.SelectFolderDlg()                          --显示文件夹选取对话框并返回选取的路径名


查看实例窗口
5. 进入PDMS,在命令行输入show !!DlgTest
6. 示例窗体代码DATA\pmllib\Common\forms\DlgTest.pmlfrm


其它说明
7. object JFileDlg采用VBS实现标准windows文件对话框显示,请确保机子能正确运行VBS文件
8. object JFileDlg仅适用于Windows XP系统,否则将出现pml标准输入窗口
9. 如有意见或建议请电邮[url=mailtoiJunCQ@msn.com]LiJunCQ@msn.com[/url]


090314q3836p34mh8viibp.zip (5.37 KB, 下载次数: 62)
过年啦!!!!

该用户从未签到

新手上路

积分
3
发表于 2014-5-9 14:23:19 | 显示全部楼层
看起来好像挺高级
回复 支持 反对

使用道具 举报

签到天数: 17 天

[LV.4]瞎扑签到4级

新手上路

积分
245
发表于 2014-7-11 11:17:03 | 显示全部楼层
不错,能下载
今天很开心!
回复 支持 反对

使用道具 举报

签到天数: 12 天

[LV.3]瞎扑签到3级

新手上路

积分
130
发表于 2020-4-1 15:35:11 | 显示全部楼层
不错,谢谢分享

今天很开心!
回复 支持 反对

使用道具 举报

本版积分规则

QQ|手机版|关于我们|Archiver|手机版|小黑屋|工程G3D ( 鄂ICP备16022302号-2 )

GMT+8, 2024-11-27 03:11 , Processed in 0.078128 second(s), 32 queries .

Powered by Discuz! X3.5

Copyright © 2001-2024 Tencent Cloud.

快速回复 返回顶部 返回列表