没有合适的资源?快使用搜索试试~ 我知道了~
资源推荐
资源详情
资源评论
OnKeyPress事件
OnKeyPress事件是在用户按下键盘上任何一个可打印的字符时发生,只有能接收键盘输入的组件才有OnKeyPress事件。我们常常利用OnKeyPress事件截取在编辑框和组合框组件中所输入的击键,还可以立即测试击键的有效性或在字符输入时对其进行一定的格式处理。
例如,在TEdit组件上捕获OnKeyPress事件,判断输入的是否是小写字母,如果是,将其转换为大写字母,代码如下:
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if (Key >= 'a' && Key <= 'z')
{
Key += 'A' - 'a';
}
}
将Key的值改变为0时可取消击键,这样一来对象便接收不到字符,我们可以利用这个特点来屏蔽某些字符。例如,有时候我们只允许用户输入数字,则加入如下代码:
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if (Key < '0' || Key > '9')
{
OnKeyPress事件是在用户按下键盘上任何一个可打印的字符时发生,只有能接收键盘输入的组件才有OnKeyPress事件。我们常常利用OnKeyPress事件截取在编辑框和组合框组件中所输入的击键,还可以立即测试击键的有效性或在字符输入时对其进行一定的格式处理。
例如,在TEdit组件上捕获OnKeyPress事件,判断输入的是否是小写字母,如果是,将其转换为大写字母,代码如下:
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if (Key >= 'a' && Key <= 'z')
{
Key += 'A' - 'a';
}
}
将Key的值改变为0时可取消击键,这样一来对象便接收不到字符,我们可以利用这个特点来屏蔽某些字符。例如,有时候我们只允许用户输入数字,则加入如下代码:
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if (Key < '0' || Key > '9')
{
Key = 0;//取消刚才输入的字符
}
}
注意:OnKeyPress事件可以引用任何可打印的键盘字符,一个来自标准字母表的字符或少数几个特殊字符之一的字符与 CTRL 键的组合,以及 ENTER 或 BACKSPACE 键,但它并不能识别功能键(F1~F12),上下左右键,Shift键,Ctrl键以及Alt键等特殊控制键或者是组合键,要捕获这些键可以采用OnKeyDown和OnKeyUp事件。
OnKeyDown/OnKeyUp事件
当按下某个键不放时,产生OnKeyDown事件;释放按键时,则产生OnKeyUp事件。虽然 OnKeyDown 和OnKeyUp 事件可应用于大多数键,它们最经常地还是应用于扩展的字符键如功能键等,以弥补OnKeyPress事件的不足。
例如,TEdit组件的OnKeyDown/OnKeyUp事件过程框架如下:
void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key,
TShiftState Shift)
void __fastcall TForm1::Edit1KeyUp(TObject *Sender, WORD &Key,
TShiftState Shift)
其中参数Key返回键盘的虚拟键码。
注意:OnKeyDown和OnKeyUp事件中的Key是Word型的,表示用户按的是键盘上的哪个键,OnKeyPress中的Key是Char型,表示用户输入什么字符。
参数Shift提供事件发生时Shift,Ctrl和Alt键的状态。Shift,Ctrl和Alt键的Shift值分别为ssShift,ssCtrl和ssAlt。例如,判断Shift,Ctrl和Alt键是否被按下的代码如下:
}
}
注意:OnKeyPress事件可以引用任何可打印的键盘字符,一个来自标准字母表的字符或少数几个特殊字符之一的字符与 CTRL 键的组合,以及 ENTER 或 BACKSPACE 键,但它并不能识别功能键(F1~F12),上下左右键,Shift键,Ctrl键以及Alt键等特殊控制键或者是组合键,要捕获这些键可以采用OnKeyDown和OnKeyUp事件。
OnKeyDown/OnKeyUp事件
当按下某个键不放时,产生OnKeyDown事件;释放按键时,则产生OnKeyUp事件。虽然 OnKeyDown 和OnKeyUp 事件可应用于大多数键,它们最经常地还是应用于扩展的字符键如功能键等,以弥补OnKeyPress事件的不足。
例如,TEdit组件的OnKeyDown/OnKeyUp事件过程框架如下:
void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key,
TShiftState Shift)
void __fastcall TForm1::Edit1KeyUp(TObject *Sender, WORD &Key,
TShiftState Shift)
其中参数Key返回键盘的虚拟键码。
注意:OnKeyDown和OnKeyUp事件中的Key是Word型的,表示用户按的是键盘上的哪个键,OnKeyPress中的Key是Char型,表示用户输入什么字符。
参数Shift提供事件发生时Shift,Ctrl和Alt键的状态。Shift,Ctrl和Alt键的Shift值分别为ssShift,ssCtrl和ssAlt。例如,判断Shift,Ctrl和Alt键是否被按下的代码如下:
剩余7页未读,继续阅读
资源评论
没有水勒鱼
- 粉丝: 40
- 资源: 256
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功