回 帖 发 新 帖 刷新版面

主题:请教如何在VFP60中编写复制,剪切,粘贴按钮???

版主:你好!
     请教如何在VFP60中编写复制,剪切,粘贴按钮???

回复列表 (共5个回复)

沙发


做一个菜单呀

做菜单的时候,选择系统的一些命令就可以实现

具体可看一下帮助文档

板凳

最简方法:
借用VFP的主菜单中的复制,剪切,粘贴菜单项。
1.用在自建菜单中时,在菜单设计器中,菜单名称填入“复制”,结果选择“菜单项 #”,后面填入“_med_copy”;同样再输入菜单名称“粘贴”,结果选择“菜单项 #”,后面填入“_med_paste”;再次输入菜单名称“剪切”,结果选择“菜单项 #”,后面填入“_med_cut”。ok!

2.若要用命令实现,则
SYS(1500, '_MED_PASTE', '_MEDIT')  &&执行粘贴操作
SYS(1500, '_MED_COPY', '_MEDIT')  &&执行复制操作
SYS(1500, '_MED_CUT', '_MEDIT')  &&执行剪切操作

另外也可以利用系统变量_CLIPTEXT实现。





3 楼


您好:
我是吉祥软件工作室
吉祥物业管理收费系统2006单机版,多种版本选择:标准版、帐户版、租赁版、综合版、摊位收费、取暖费等版本。软件实用性强,有可靠的服务和销售体系,可根据用户需要定制和修改软件。
使用本软件,一次注册,享受终身免费升级和服务。本工作室宗旨:让软件适应用户,让用户信任软件!
下载主页:http://www.jixicn.com


实现右键的“复制”、“剪切”、“粘贴”功能
文本框的RightClick事件:
DEFINE POPUP popRight SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR _med_undo OF popRight PROMPT "撤消(\<U)" 
DEFINE BAR 2 OF popRight PROMPT "\-"
DEFINE BAR _med_cut OF popRight PROMPT "剪切(\<T)"
DEFINE BAR _med_copy OF popRight PROMPT "复制(\<C)"
DEFINE BAR _med_paste OF popRight PROMPT "粘贴(\<P)" 
DEFINE BAR _med_clear OF popRight PROMPT "删除(\<D)" 
DEFINE BAR 7 OF popRight PROMPT "\-" 
DEFINE BAR _med_slcta OF popRight PROMPT "全选(\<S)" 
ACTIVATE POPUP popRight

4 楼

楼上:选择后,按mouse右键,快捷菜单显示,而原表单最小化,请问如何使快捷菜单、表单均显示呢?

5 楼

4楼的表单是顶层表单,模式表单,请问如何处理?

我来回复

您尚未登录,请登录后再回复。点此登录或注册