pfc中右键服务开启,可以设置很多的功能,应该是依据控件而定的。
那么如何在右键菜单中添加自定义菜单项
在datawindow的pfc_prembmenu(ref m_dw am_dw) 添加
对应的菜单即可,如:
am_dw.m_table.m_restorerow.enabled=false
am_dw.m_table.m_restorerow.visible=false
am_dw.m_table.m_delete.enabled=true
am_dw.m_table.m_delete.visible=true
am_dw.m_table.m_delete.text='采购员查询'
am_dw.m_table.m_insert.enabled=true
am_dw.m_table.m_insert.text='全选'
am_dw.m_table.m_addrow.enabled=true
am_dw.m_table.m_addrow.text='分配给采购员'
然后在对应的pfc_delete()
pfc_insert()
pfc_addrow() 中添加相应的代码
example:=========================================
string ls_mtrl_no,ls_mtrl_name,ls_buyer
integer li_row,li_insert,li_rec,li_temp,li_num=0,ls_bz
long ll_tvi
ls_buyer=dw_2.object.emp_no[dw_2.getrow()]
if ls_buyer='' or isnull(ls_buyer) then
messagebox("提示","没有选择采购员")
dw_mtrl.setrow(1)
dw_mtrl.drag(end!)
return -1
end if
li_temp=dw_mtrl.getselectedrow(0)
do while li_temp > 0
li_num++
ls_bz=dw_mtrl.object.compute[li_temp]
if ls_bz=1 then
messagebox("提示","该选择里包含有已分配的物资,请重新选择一次")
return -1
end if
li_temp=dw_mtrl.getselectedrow(li_temp)
loop
if messagebox("提示","总共有"+string(li_num)+"种物资要分配给采购员,确认吗?Y/N",information!,yesno!,1)=2 then
return -1
end if
li_row=dw_mtrl.getselectedrow(0)
do while li_row > 0
ls_mtrl_no=dw_mtrl.object.materialid[li_row]
ls_mtrl_name=dw_mtrl.object.materialname[li_row]
li_insert=dw_buyer.insertrow(0)
dw_buyer.object.mtrl_no[li_insert]=ls_mtrl_no
dw_buyer.object.ware_no[li_insert]='A'
dw_buyer.object.staff_no[li_insert]=ls_buyer
dw_buyer.object.materialname[li_insert]=ls_mtrl_name
dw_buyer.scrolltorow(li_insert)
dw_mtrl.object.staff_no[li_row]=ls_buyer
li_row=dw_mtrl.getselectedrow(li_row)
loop
li_rec=parent.event pfc_save()
if li_rec < 1 then
messagebox("提示","保存失败")
dw_buyer.retrieve(ls_buyer)
// ll_tvi = tv_1.FindItem(currenttreeitem! , 0)
// tv_1.event ue_retrieve(ll_tvi)
end if
return 1
分享到:
相关推荐
本例用C++实现了在系统右键菜单中添加自定义菜单项和删除该自定义菜单项,内附源代码和可执行的release的exe文件。
com atl shell extension往windows右键菜单上添加自定义菜单项.zip
Delphi Edit右键系统菜单加自定义菜单项,注意是添加,不是用新菜单替换系统菜单!
Winforn中实现ZedGraph自定义添加右键菜单项示例源码
我的原创: 花生米AJAX-UI系列之:基于JQUERY的右键菜单0.1版 ...提供了菜单项中那一项被作废(即点击了也不能调用其方法的状态),哪一项被重新启用的方法 经测试,兼容IE6--IE8,FF,CHROME浏览器 详细说明请参见API
flex 右键菜单两种实现: 1.系统右键菜单,系统右键菜单项中添加菜单项 2.屏蔽系统右键菜单,自定义右键菜单
flex 右键菜单两种实现: 1.系统右键菜单,系统右键菜单项中添加菜单项 2.屏蔽系统右键菜单,自定义右键菜单
通过注册表把自己的程序添加进入右键(如“我的右键菜单”),鼠标右键某个(或多个)文件时选择“我的右键菜单”,然后弹出winform程序,鼠标选中文件的完整路径及文件名自动显示在winfom中,类似WinRAR右键菜单...
同时,也可以通过控件的AddItem方法在默认菜单上追加菜单项,AddItem有三个参数,第一个参数:菜单项Text,第二个参数:右键菜单方法,通过代理传递,第三个参数:返回值,出现异常时候带出异常原因。AddItem成功...
除了隐藏或移除不需要的菜单项,它还支持自定义右键菜单,你可以直接将一些实用的右键选项添加到右键菜单。在菜单栏中选择软件的快捷地址即可!如添加快捷关机功能,只需鼠标在桌面向下拉取屏幕滑动,即可实现关机这...
Delphi在系统默认的窗口菜单中添加自定义菜单项,在窗体标题栏的右键菜单中添加自定义菜单,这个源码功能主要是演示这一功能如何实现,超简单,面向Delphi的基础学者。 运行环境:Windows/Delphi7
C# winform 实现按钮固定到菜单栏以及右键菜单
一个由js封装实现的网页右键菜单制作插件,可支持多级子菜单的右键菜单,替换掉了IE中固有的右键菜单,xml方式书写菜单、完全自定义菜单项、一个文档可实例化多个对象、多种显示模式、可支持灵活切换皮肤、多浏览器...
在文件夹空白处右键菜单出现“进入cmd”菜单项,有源代码的,编译后注册dll,就可以使用
对于习惯了使用 Windows 系统的用户肯定会经常碰到自己的 Windows 右键菜单随着安装的软件添加的项目越来越多,而想要删除一些不需要的右键菜单项这个小工具可以轻松帮助你。 Windows 右键菜单管理工具中文版 ...
在Windows系统下的资源管理器(explorer.exe)中的文件、文件夹右键菜单中自定义一个菜单项,并展开第二级。使用VC++ 6.0开发,Windows XP 32位下测试通过。wzsy的...
之前我们分享过几款简单的jQuery右键菜单插件,比如超实用jQuery右键菜单 可自定义菜单弹出区域和基于Bootstrap外观的JavaScript右键菜单插件,都比较实用。这次我们要分享一款基于jQuery的自定义下拉框选择菜单,这...
改版本是“使用JQUERY 自创的自定义右键菜单插件 ”的重大改进,原始版本不再使用! 可以对表格,列表,或者单个DOM容器进行右键绑定 菜单项的文字、图标样式,调用方法均可自定义,图标样式定义更为灵活 菜单中分隔...
JS多级右键菜单插件源码,JS代码动态设置菜单项(数据可以JSON嵌套也可以数组方式),可以设置很多级菜单项,参数设置便捷灵活,具体使用方法请参考示例。(注:不兼容IE9以下的IE浏览器)
定位注册表,你可以清清楚楚了解到该右键菜单涉及的注册表项 可以管理右键菜单中的“新建”项目 可以管理右键菜单中的“发送到”项目 支持清理ATI、Intel、nVidia 等显卡驱动的右键菜单模块 支持新增自定义右键菜单 ...