1
vote
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

Statistics

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

Visits by Source

User Actions

Users who voted for this posting

Michał Rajewicz
Subscribe:
Contact us to advertise on DelphiFeeds.com

Community Links

Torry Firebird News

Sponsor

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