Control.KeyPress
(gb.qt4)
Event KeyPress ( )
当控件有焦点时有按键按下，发生该事件。
用
Key类可以获取按下的按键信息。
KeyPress例程结束后，
TextBox控件内部的文本被
Gambas根据按键编辑。所以它不检测从KeyPress
事件处理程序及其调用的任何子程序和函数中写回进Text
属性的任何信息。而Change事件开始于内容更新之后。
Example
PUBLIC SUB n_Keypress()
'事件处理对于组 n - 这是9X9的TextBoxe数组
DIM ltext AS Variant
DIM ltag AS Variant
ltext = Key.Text ' 获取键代码
ltag = LAST.Tag ' 组属性
IF NOT IsNull(ltext) THEN
IF Mid(ltext, 1) >= "0" AND Mid(ltext, 1) <= "9" THEN
' 按下0～9的数字键中的一个
z[ltag] = Int(Asc(ltext) - 48) ' 转换字符串为整数，并保存在整数数组中
...
' 不必像这样更新域： n.Text = 48 + i
前一个 下一个 编辑 重命名 撤销 刷新 搜索 管理
