delphi7 同时按下Ctrl+H键写法,键值

OnKeyDown事件:

if  (ssctrl in shift) and (key = $48)   then

begin
     ShowMessage('1111');

end
else
begin

end;

原文地址:https://www.cnblogs.com/lantianhf/p/5642600.html