关于网友提出的“ 送分题，关于TTimer的使用”问题疑问，本网通过在网上对“ 送分题，关于TTimer的使用”有关的相关答案进行了整理，供用户进行参考，详细问题解答如下：
问题： 送分题，关于TTimer的使用
描述: 我想实现某事件触发后过1s钟后执行某项操作，又不想使用Sleep，通过TTimer应该怎么实现呢？
我想做一个函数，专门实现wait n秒，但系统又不失去响应的功能，这个函数应该怎么写呢？
解决方案1: 同意楼上，结账吧。
解决方案2: procedure Delay(DelayTime: Cardinal);
var
FirstTickCount: Cardinal;
begin
FirstTickCount := GetTickCount;
repeat
Application.ProcessMessages;
until ((GetTickCount - FirstTickCount) >= DelayTime);
end;
以上介绍了“ 送分题，关于TTimer的使用”的问题解答，希望对有需要的网友有所帮助。
本文网址链接：http://www.codes51.com/itwd/2768481.html
