『delphi』Enter键移动焦点的效果
procedure Tlogin.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_return then
FindNextControl(ActiveControl,true,false,false).SetFocus;
end;
end.
其他的的KeyDown选中Edit1的就可以了
好的代码像粥一样，都是用时间熬出来的
分类:
Delphi
· 浏览器原生「磁吸」效果！Anchor Positioning 锚点定位神器解析
· 没有源码，如何修改代码逻辑？
· 一个奇形怪状的面试题：Bean中的CHM要不要加volatile？
· ［.NET］调用本地 Deepseek 模型
· 一个费力不讨好的项目，让我损失了近一半的绩效！
· 全网最简单！3分钟用满血DeepSeek R1开发一款AI智能客服，零代码轻松接入微信、公众号、小程
· .NET 10 首个预览版发布，跨平台开发与性能全面提升
· 《HelloGitHub》第 107 期
· 全程使用 AI 从 0 到 1 写了个小工具
· 从文本到图像：SSE 如何助力 AI 内容实时呈现？（Typescript篇）
2018-10-04 Delphi中Sender对象的知识
2018-10-04 Delphi处理事件函数中的Sender: TObject代表什么？
2018-10-04 (sender as TButton).some 和 TButton(sender).some 的区别是什么？
2018-10-04 什么情况下需要检测预装Win8/8.1电脑内置激活密钥（即Win8/8.1 OEM key）？