- 博客(0)
- 资源 (6)
- 收藏
- 关注
TMS VCL UI Pack 10.3.1.0 delphi xe10.2.3亲测可用.zip
TMS VCL UI Pack 10.3.1.0 delphi xe10.2.3亲测可用包含各种网格控件
2021-02-18
delphi 判断键盘多久没有使用
procedure TForm1.Timer1Timer(Sender: TObject);var vLastInputInfo: TLastInputInfo;begin vLastInputInfo.cbSize := SizeOf(vLastInputInfo); GetLastInputInfo(vLastInputInfo); if GetTickCount - vLastInputInfo.dwTime > 5000 then begin timer1.Enabled:= false; showmessage('超过5秒,用户未动鼠标!'); end;end;
2010-06-24
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人