Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.13;
Скачать: CL | DM;

Вниз

О блокировке заставки   Найти похожие ветки 

 
ivlex ©   (2003-01-01 04:06) [0]

Как мне из моей программы запустить Nero так, чтобы когда Nero запущен, не запускалась заставка, не выключался монитор и не активировался режим ожидания? Заранее благодарен.


 
Yegor Derevenets   (2003-01-01 10:05) [1]

Можно попробовать сделать эмитацию нажатия клавиши/перемещения мыши. За результат не отвечу.


 
mukha ©   (2003-01-01 11:56) [2]

Из форума (не тестировано) просто выдержка:

Walker © (27.11.02 13:01)
Спасибо всем... я тут немного помучался, вот что у меня получилось:

Предлагаю свой Unit для решения проблемы :)

unit ScreenSaveAtivater;

interface

procedure EnableScreenSave;
procedure DisableScreenSave;


implementation
uses
Windows;

var
ScreenSaverEnabled: Boolean;
ScreenSaveTimeOut: Integer;

procedure DisableScreenSaver;
begin
if ScreenSaverEnabled then
begin
SystemParametersInfo(SPI_GETSCREENSAVETIMEOUT, 0, @ScreenSaveTimeOut, 0);
SystemParametersInfo(SPI_SETSCREENSAVETIMEOUT, 0, nil, 0);
ScreenSaverEnabled := False;
end;
end;

procedure EnableScreenSaver;
begin
if not ScreenSaverEnabled then
begin
SystemParametersInfo(SPI_SETSCREENSAVETIMEOUT, ScreenSaveTimeOut, nil, 0);
ScreenSaverEnabled := True;
end;
end;

initialization
SystemParametersInfo(SPI_GETSCREENSAVETIMEOUT, 0, @ScreenSaveTimeOut, 0);
ScreenSaverEnabled := True;
finalization
EnableScreenSaver;
end.



Страницы: 1 вся ветка

Текущий архив: 2003.01.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
1-37034
solo
2002-12-28 20:27
2003.01.13
Изменение ширины столбца TListView


3-36942
Ken Keray
2002-12-17 09:54
2003.01.13
Вопрос про кодировку


1-37001
Armageddon
2002-12-27 17:55
2003.01.13
Создание динамического массива


1-37128
greenrul
2003-01-04 15:07
2003.01.13
Как заменить перерисовку SpeedButton?


14-37304
drin
2002-12-22 02:16
2003.01.13
WinAmp