鱼C论坛

 找回密码
 立即注册
查看: 2812|回复: 2

按任意键退出屏幕保护程序要怎么写那

[复制链接]
发表于 2013-5-6 23:30:23 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
按任意键退出屏幕保护程序要怎么写那
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2013-5-14 15:06:17 | 显示全部楼层
ApplicationEvents控件
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  if (Msg.message=WM_KEYDOWN)or(Msg.message=WM_LBUTTONDOWN)or(Msg.message=WM_RBUTTONDOWN)then
  begin
    close;    //Do something
  end; 
end;
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2013-5-15 10:45:36 | 显示全部楼层
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-11-22 07:55

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表