Vote UpVote

Using Delphi for jiggling the mouse – twm’s blog

The Wiert Corner – To prevent a screen-saver from kicking in [WayBack] jiggling the mouse – twm’s blog: My solution then is this procedure: procedure JiggleMouse; var Inpt: TInput; begin Inpt.Itype := INPUT_MOUSE; Inpt.mi.dx := 0; Inpt.mi.dy := 0; Inpt.mi.mouseData := 0; Inpt.mi.dwFlags := MOUSEEVENTF_MOVE; Inpt.mi.time := 0; Inpt.mi.dwExtraInfo := 0; SendInput(1, Inpt, SizeOf(Inpt)); end; Call it in regular intervals and the screen saver will not start. This is now (or soon will be) in the u_dzOsUtils unit which is part of my dzlib utility library. –jeroen
Favorite? Off-Topic? jpluimers @ 2020-09-22 13:02


Visits: 71
Votes: 1
Favorites: 0
Off-Topic: 0

Visits by Source

User Actions

Users who voted for this posting

Michał Rajewicz
Contact us to advertise on DelphiFeeds.com

Community Links

Torry Firebird News


Please login or register to use this functionality.
(click on this box to dismiss)