📄 vfpdat67b.dat
字号:
说明: (1)LABEL子句的<键标号>表示定义功能的按键,功能由<命令>来实现。
----
(2)ON KEY LABEL 命令执行后,若进入了某种状态,则用户按了指定的功能键或鼠标键就会执行所设置的<命令>
(一般为DO命令)
这里所说的状态是指程序执行中遇到READ,BROWSE等命令,或者进入窗口操作或用户定义菜单的操作等情况, 这些状态的共同特点,是程序执行暂停并等待用户操作。
被设置的<命令>执行后,将返回到原状态。
(3)对于以前由ON EKY LABEL命令建立的功能键定义,可用命令 PUSH KEY来保存,以命令 POP KEY来恢复,执 行命令 PUSH KEY CLEAR来清除。
例:设计一个可利用功能键为SB.DBF添加记录,删除或恢复记录的游览窗口。
PUSH KEY CLEAR
ON KEY LABEL f4 DO tj
ON KEY LABEL f5 DO schf
ON KEY LABEL f6 DO pk
bs="BROWSE TITLE"''+''
USE sb
&bs
PROCEDURE tj
APPEND BLANK
PROCEDURE schf
IF DELETED()
RECALL
ELSE
DELETE
ENDIF
PROCEDURE pk
PACK
&bs
例:将鼠标右键设置为功能键,使用户SB.DBF的游览窗口中编辑部门字段时,按下鼠标右键可出现另一个游览 窗口,在
其中显示部门代码及其名称。
CLEAR ALL
PUSH KEY CLEAR
ON KEY LABEL rightmouse DO tis
SELECT 0
USE sb
BROWSE TITLE''
PUSH KEY CLEAR
PROC tis
IF VARREAD()=''
SELECT bmdm
BROWSE TITLE''NOMODIFY =INKEY (0,'MH')
SELECT sb
ENDIF
程序运行后先出现显示SB.DBF的浏览窗口。将光标定位到部门字段后,若按鼠标右键,就会在一个名为部门表 的浏览窗口中
显示部门代码及名称。
函数VARREAD()返回浏览窗口当前编辑字段的名字。
INKEY函数的格式为:INKEY([<数值表达式>][,<字符表达式>])。该函数能返回用户击键的键值。
<字符表达式> 可使用S,H,M等3个字符。S表示显示光标; H表示隐藏光标, 要检查鼠标击键必须用M,否则只 检查键击键.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -