B
bigbug
Unregistered / Unconfirmed
GUEST, unregistred user!
我想用程序调整屏幕保护的等待时间，程序如下：
var
uiaction ,uiparam: uint
pvparam : integer
fwinini : uint
begin
uiaction := SPI_SETSCREENSAVETIMEOUT
uiparam := strtoint ( edit1.text ) //EDIT1中为要等待的秒数；
fwinini := SPIF_SENDCHANGE
pvparam := 0 ;
SystemParametersInfo( uiAction, uiParam, @pvParam, fWinIni )
end
但执行后等待时间并没有变化，谁能告诉我为什么
var
uiaction ,uiparam: uint
pvparam : integer
fwinini : uint
begin
uiaction := SPI_SETSCREENSAVETIMEOUT
uiparam := strtoint ( edit1.text ) //EDIT1中为要等待的秒数；
fwinini := SPIF_SENDCHANGE
pvparam := 0 ;
SystemParametersInfo( uiAction, uiParam, @pvParam, fWinIni )
end
但执行后等待时间并没有变化，谁能告诉我为什么