How to prevent screensaver from starting in KOL?

← →
IFO (2005-05-22 16:52) [0]

I would like to make sure that screesaver won"t start while my application is running. I"ve tried something like this:

function TForm1.KOLForm1Message(var Msg: tagMSG; var rslt: integer): boolean;
begin
Result := false;
CASE Msg.message OF
WM_SYSCOMMAND:
if msg.wParam = SC_SCREENSAVE then
begin
rslt := 0;
result := true
end
end
end;

But it doesn"t help. Could you please advise?

← →
Владимир Кладов (2005-05-22 19:19) [1]

this question is not certain for KOL.

I used API functions keybd_event and mouse_event.

There is a simple way:
SystemParametersInfo( SPI_SCREENSAVERRUNNING, Word( False), nil, 0);

How to prevent screensaver from starting in KOL? Найти похожие ветки