怎样使用快捷键? 比如在程序运行后,按CTRL+1就会弹出对话框:showmessage('hi');怎么做?谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 可以用 Hook实现... 这样即使程序不在前台也能 使用hotkey procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin if (Key = Ord('I')) and (ssCtrl in Shift) then //Ctrl+A ShowMessage('hi');end; array of const 如何得到当前计算机的所有数据库,请各位指点! 窗体缩放时如何只显示窗体轮廓线 菜鸟问一下,怎么在当前目录下创建文件夹? [取時間的問題] 我的处男作! selectDirectory怎样才能使目录浏览窗口居中? idhttp能否自己控制读取?实在对不起。我没分啊。哪位大哥帮一下我。我急用 这样动态创建一个表? 我这样理解Tcomponent.create(Aowner:Tcomponent)对么? 有谁能不能谈一下ShellApi如何封装的?好像它封装了Api? 如何获得系统时间啊?我只要时分秒!谢谢!
Shift: TShiftState);
begin
if (Key = Ord('I')) and (ssCtrl in Shift) then //Ctrl+A
ShowMessage('hi');
end;