Delphi按下回车键使各控件依次获得焦点
来源:互联网 发布:粤语发音翻译软件 编辑:程序博客网 时间:2024/05/19 06:38
procedure TForm1.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
var
i : Integer;
begin
if Msg.CharCode = VK_RETURN then
begin
i := ActiveControl.ComponentIndex + 1;
if (i = ComponentCount) then
i := 0;
TWinControl(Controls[i]).SetFocus;
end;
Handled := True;
end;
代码没有考虑含有Parent的情况,根据自己需要改吧
- Delphi按下回车键使各控件依次获得焦点
- Delphi按下回车键使各控件依次获得焦点
- 按下回车键后Combox控件焦点转移到下一控件
- Delphi回车键切换焦点
- Delphi中当前获得焦点的控件
- 回车键时按钮获得焦点
- 按回车键切换焦点
- 孙鑫VC++深入详解:Lesson7 Part4 ---对话框上各个控件之间循环接受回车键获得焦点
- 使DataGridView控件输入回车键后单元格焦点向右移
- 按回车键在不同的控件焦点间移动
- lazarus:按回车键焦点自动跳至下一个控件
- 按回车键 输入框光标依次移动
- jquery 实现上下左右回车键按下 移动文本框焦点
- 用户控件获得焦点
- 控件获得焦点
- 按回车键,焦点转到下一个
- asp.net页面获得回车键焦点的问题
- c# datagridview回车键后获得右侧单元格焦点
- QT QMimeData类
- HDU1847----Good Luck in CET-4 Everybody!
- dd if=/dev/zero of=的含义是什么?Linux 下的dd命令使用详解
- CXX0030: Error: expression cannot be evaluated的错误原因
- Qt实现遍历文件夹和文件目录,并过滤和获取文件信息、后缀名、前缀名
- Delphi按下回车键使各控件依次获得焦点
- 10 More Common Mistakes Java Developers Make when Writing SQL
- hdu 1011 Starship Troopers 树形dp
- fleaPHP框架的一些基础问题
- NYOJ 11 奇偶数分离 2013年8月20日
- camera测试标准
- 教你如何使用VFW调用视频压缩解压缩
- hdu 3371 Connect the Cities
- 第一篇:在Eclipse下搭建Android环境