BCB获取键盘、鼠标空闲时间

 void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
    TLastInputInfo t;
    t.cbSize = sizeof( TLastInputInfo );
    GetLastInputInfo( &t );
    Label2->Caption = IntToStr( GetTickCount() - t.dwTime );
}

转载于:https://www.cnblogs.com/burellow/archive/2012/02/17/2355795.html