VFP范例为VFP5的编辑控件定义右键弹出式菜单

为VFP5的编辑控件定义右键弹出式菜单 在VFP5的TextBox、EditBox、ComboBox控件的文本输入区中输入的文本可能需要进行有选择地复制、粘贴、剪切、删除等操作，若开发的应用程序没有实现这些操作功能的菜单，将无法对输入的文本进行上述操作（除程序设计软件定义的编辑功能键外）。如何实现这些操作呢？ 　　一种方法是，设计能进行这些操作功能的菜单，但使用中要选择菜单，鼠标移动距离大，操作显得繁琐。 　　另一种方法是，设计一个右键弹出式菜单，这样使用起来较为简便。本文介绍的就是这一种方法。 　　可通过编写这些控件的RightClick事件代码（在事件代码中定义右键弹出式菜单），实现文本复制、粘贴、剪切、删除等操作。 　　为简化RightClick事件代码，可将菜单代码作为一个独立的程序文件或自定义函数保存。下面就是RightClick事件代码和菜单程序代码。 　　1．RightClick事件代码： 　　st=this.seltext 　　va=this.value 　　do rightmenu with st,va 　　上述代码中，seltext属性返回在控件的文本输入区中所选择的文本内容，或返回一个空串（如果没有选择文本）。 　　value属性指在控件的文本输入区中所输入的文本内容。 　　2．Rightmenu.prg为程序文件（即菜单代码），其代码如下： 　　para st,va ＆＆ 参数st为选定的文本内容，参数va为输入的所有文本内容 　　define popup popright shortcut relative from mrow(),mcol() ＆＆ 定义弹出式菜单，菜单名popright 　　define bar _med_copy of popright prompt ″复制(\表

关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf