当前位置:主页>销售管理软件> 列表

一个很简单的问题,非常容易得分 找小型企业财务软件

销售管理软件版1楼: 在delphi中按回车键响应按钮事件 代码怎么来写啊?谢谢大家帮忙

2楼: OnkeyPress里写代码 如小型企业财务软件

3楼: 捕捉按键消息,判断是回车键就响应

4楼: 在OnKeyPress里是这样写吗??
if key=#13 then
begin
button1.Click;
end;

5楼: 用下面的函数实现回车键代替TAB键后,麻烦来了。
一个窗口中有一个dbgrid、两个dbmemo,我希望在dbgrid中及在控件之间按回车键时实现
焦点转移到是很顺利的实现了,但希望在dbmemo中打回车键时实现换行而不是焦点转移,
请问如何实现?
procedure TForm_main.DoEnterAsTab(var Msg: TMsg; var Handled: Boolean);
begin
if Msg.Message = WM_KEYDOWN then
begin
if Msg.wParam = VK_RETURN Then
Keybd_event(VK_TAB, 0, 0, 0);
end;
end;
procedure TForm_main.FormCreate(Sender: TObject);
begin
Application.OnMessage := DoEnterAsTab;
end;

6楼: 对啊!!!

销售管理软件版7楼: 在需要响应的onkeypress中写代码
if key=chr(VK_RETURN) then
SBtn_cancelClick(Sender);

8楼: 简单可行就好,都有答案了,我没分了,55555555555

9楼: love751,你的代码是对的,另外Form的keypreview属性设置为True.

10楼: 多人接受答案了。