2013-12-07
展开全部
可以判断 具体代码如下
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key = #16 then // 此处#16 是按键的10进制数值 你可以百度查查你要的键值是多少
begin
Application.MessageBox('你按下了SHIFT','提示');
end;
end;
如有不对 请再联系
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key = #16 then // 此处#16 是按键的10进制数值 你可以百度查查你要的键值是多少
begin
Application.MessageBox('你按下了SHIFT','提示');
end;
end;
如有不对 请再联系
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询