delphi 7 时间控制问题 高手进

来源：百度知道 编辑：UC知道 时间：2024/05/15 18:11:54
一个程序注册了热键F2。当运行这个程序按下F2时弹出一个对话框‘1111’
我的要求是当按下F2键时廷时10秒后再弹出这个对话框。付上代码谢谢！

在程序界面上拖放一个timer,把周期设为10000；
ontimer事件:
showmessage('1111');
timer.enable:=false;

F2触发的事件里面写上:
timer.enable:=true;

在你接收按键消息那直接
sleep（10000）

sleep（10000）;
就是延迟10秒