请教高手!

superbowl 2004-09-27 11:42:22
请教各位大虾:如何判断鼠标停止运行后一秒中后才触发事件?多谢!

...全文
125 9 打赏 收藏 举报
写回复
9 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
superbowl 2004-11-12
  • 打赏
  • 举报
回复
感谢beyondktl!
hottey 2004-11-11
  • 打赏
  • 举报
回复
有人叫我来和楼上的抢分,故我来灌水于此!印
beyondtkl 2004-11-11
  • 打赏
  • 举报
回复
红色尖叫 不好喝。。。


yiqian 的帖子。。

function LastInput: DWord;
var
LInput: TLastInputInfo;
begin
LInput.cbSize := SizeOf(TLastInputInfo);
GetLastInputInfo(LInput);
Result := GetTickCount - LInput.dwTime;
end;


//Example:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := Format('System Idle since %d ms', [LastInput]);
end;


// The GetLastInputInfo function retrieves the time
// of the last input event.
// Minimum operating systems: Windows 2000
superbowl 2004-11-11
  • 打赏
  • 举报
回复
大家都不会吗?
superbowl 2004-10-04
  • 打赏
  • 举报
回复
我发表一下我的看法:首先我不同意使用timer控件,在实际操作中会时不长的变成漏斗状,别人看了很难受。其次,mousemove事件过于敏感,稍微有点动作都不行。我倾向于使用自带函数,但一直没有找到,请楼上的大虾具体讲解一下。多谢了!
蓝色光芒 2004-09-28
  • 打赏
  • 举报
回复
设置一个钩子,在钩子里记时。
masterjames 2004-09-27
  • 打赏
  • 举报
回复
同意楼上
pengxuan 2004-09-27
  • 打赏
  • 举报
回复
同意楼上
江山易改 2004-09-27
  • 打赏
  • 举报
回复
首先加个TTIMER控件,每一秒计一次,在OnMouseMove中对将触发变量置假
若在一秒内触发变量置假则不触发事件,否则触发
发帖
Windows SDK/API

1177

社区成员

Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
帖子事件
创建了帖子
2004-09-27 11:42
社区公告
暂无公告