当前位置: 代码迷 >> VFP >> VFP中怎么设定快捷键,以及提示对话框
  详细解决方案

VFP中怎么设定快捷键,以及提示对话框

热度:4147   发布时间:2013-02-26 00:00:00.0
VFP中如何设定快捷键,以及提示对话框
最近接触到了VFP,但是我以前根本没有学过,有问题如下
1,如何在form上给某个按钮设定快捷键,尤其是像F5,   F6什么的的。
2,对某个按钮,如何弹出提示对话框,比如点击删除,提示“你真的要删除吗?是(Y),不是(N)”

------解决方案--------------------------------------------------------
2、

if messagebox( '你真的要删除吗? ',4+32+256, '信息提示 ')=7
return
endif
*删除代码
------解决方案--------------------------------------------------------
1、

方法一:设置按钮的Caption为: "删除(\ <D) ",这样快捷键为Alt+D


方法二:设置表单KeyPriview为.T.,然后表单的KeyPress事件代码:
LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode=-4 &&这样快捷键为F5
THISFORM.COMMAND1.CLICK()
ENDIF
  相关解决方案