最近接触到了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