一个简单的ctrl+enter问题 如何让自己的程序按下ctrl+enter时执行button1.click事件? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.FormCreate(Sender: TObject);begin Form1.KeyPreview:=True;end;procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin if (Key=VK_RETURN)and(Shift=[ssCtrl]) then Button1.Click;end; 关于区分多个同样标题同样类名的窗体问题 一个小问题,帮忙解决一下。在线等 谢谢 C++代码转为Delphi代码(DLL调用问题) 有哪些可能的原因导致BDE死掉啊啊,求救了,谢谢 请教如何修改ComCtrls.pas使菜单的自动快捷键消灭 delphi 怎样处理日期货币数据字段,用sql delphi 动画 hook鼠标,出了问题,想全局hook,在另一个贴子给足100,谢谢 如何重新编译Delphi的单元?? Delphi 程序员要不要学 XML???讨论??? 求救,关于数据查询语句 (抱歉没分了!) delphi调用excel,vb宏的问题?
begin
Form1.KeyPreview:=True;
end;procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key=VK_RETURN)and(Shift=[ssCtrl]) then Button1.Click;
end;