Leon's code worked on XP Pro 5.1, SP1. SF version 2.2.2.9.

-----Original Message-----
From: Rob [mailto:rob.ward_at_tpg.com.au]
Sent: Thursday, March 31, 2005 1:32 PM
To: sftalk_at_forth.com
Subject: [sftalk] Re: Screen saver

Thanks for your quick response Leon,
I am using Windows XP sp1 and SwiftForth 2.0.0.3 / 2.2..2.5 , and have=20
the same response on all XP machines that I have tried on!

Is that the OS that you tried on?

addendum: I have just tried on Windows 2000 and it works ok!=20
Unfortunately I need it to work on XP - so anybody have any ideas
to enable it to work on XP?

Regards

Rob

Leon Wagner wrote:

>Works fine for me:
>
>4 IMPORT: SystemParametersInfo
>
>VARIABLE PV
>
>SPI_GETSCREENSAVETIMEOUT 0 PV 0 SystemParametersInfo
>. 1
>PV ? 600
>
>SPI_SETSCREENSAVETIMEOUT 60 0 0 SystemParametersInfo
>. 1
>
>SPI_GETSCREENSAVETIMEOUT 0 PV 0 SystemParametersInfo
>PV ? 60
>
>
>First call returned timeout of 600. I set it to 60 then read it back =
and
>it's 60. Note non-zero return codes (1) in all cases.
>
>
>
>
>
> =20
>
>>-----Original Message-----
>>From: sftalk-bounce_at_forth.com [mailto:sftalk-bounce_at_forth.com]On =
Behalf
>>Of Rob
>>Sent: Thursday, March 31, 2005 5:46 AM
>>To: sftalk_at_forth.com
>>Subject: [sftalk] Screen saver
>>
>>
>>Hello everyone,
>>I am currently 'trying' to set the screen saver timeout using the
>>*SystemParametersInfo
>>*function located at
>>
>>http://msdn.microsoft.com/library/default.asp?url=3D/library/en-us/s
>> =20
>>
>ysinfo/base/systemparametersinfo.asp
> =20
>
>>I can read the value ok but I am having trouble setting the value, I
>>keep returning a zero which is an error.
>>A typical segment of code for setting is
>>
>>SPI_SETSCREENSAVETIMEOUT 60 0 0 SystemParametersInfo
>>
>>
>>The following code for reading works ok
>>
>>variable pv
>>SPI_GETSCREENSAVETIMEOUT 0 pv 0 SystemParametersInfo
>>pv @ .
>>60
>>
>>Anybody have any ideas on the correct way to set the value?
>>
>> =20
>>
>
> =20
>

----------------------------------------------------------------------
sftalk_at_forth.com The SwiftForth programming discussion email list
To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
For list command help, send subject "help" to sftalk-request_at_forth.com
Message archives are located at http://www.forth.com/archive/sftalk
----------------------------------------------------------------------
This list is a forum for SwiftForth users. For product support and bug=20
reports, please send email to support_at_forth.com
----------------------------------------------------------------------

----------------------------------------------------------------------
sftalk_at_forth.com The SwiftForth programming discussion email list
To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
For list command help, send subject "help" to sftalk-request_at_forth.com
Message archives are located at http://www.forth.com/archive/sftalk
----------------------------------------------------------------------
This list is a forum for SwiftForth users. For product support and bug
reports, please send email to support_at_forth.com
----------------------------------------------------------------------
Received on Thu Mar 31 2005 - 13:44:39 PST