如何屏蔽窗体中的快捷键?(50分)

  • 主题发起人 主题发起人 寻找
  • 开始时间 开始时间

寻找

Unregistered / Unconfirmed
GUEST, unregistred user!
如何屏蔽窗体中的快捷键?例如Alt+F4关闭窗体!
 
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);
begin
if (ssAlt in shift)and(key=115) then key:=0;
end;
 
多人接受答案了。
 

Similar threads

回复
0
查看
804
不得闲
回复
0
查看
978
不得闲
S
回复
0
查看
681
SUNSTONE的Delphi笔记
S
S
回复
0
查看
768
SUNSTONE的Delphi笔记
S
后退
顶部