请帮忙!在键盘事件中怎么样判断单击的是回车键,即Enter键!谢谢! 请大家帮忙!谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在 KeyPress 事件中if Key = #13 thenbegin//你的代码end; // 在keydown事件中也可以procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin if key=13 then showmessage('按了回车');end; procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin if Key = VK_RETURN then ShowMessage('yeah');end; 都说啦!Enter键的十进制值为13只要你进行判断就行了 if Key = #13 thenbegin 回车后需要执行的代码end; 【求救】写的控件 怎么设置属性默认值? Delphi怎么显示魔兽血条、蓝条~ 工作不忙,但不知道学什么 关于CoolTrayIcon控件的使用 高分跪求, 如何获取SATA硬盘序列号 非常急!请大家多帮忙!如何用delphi编写播放mov的文件的程序? 如何在Delphi下使Sleep键不可用 报表用qrdbrichText控件连接数据库怎么显示不出数据???? 图片记录怎么存 自定义链表表项record中能否还有DELPHI中的诸如TLABEL一类的对象 我知道事务的概念,也知道怎么写事务的代码,但我不知道什么时候该用事务?? 请问如何在标准DBGrid上实践固定列?
if Key = #13 then
begin
//你的代码
end;
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=13 then showmessage('按了回车');
end;
Shift: TShiftState);
begin
if Key = VK_RETURN then
ShowMessage('yeah');
end;
Enter键的十进制值为13
只要你进行判断就行了
begin
回车后需要执行的代码
end;