Главная страница
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.026 c
4-37474
ProtoSoft
2002-11-27 19:19
2003.01.13
Еще нужна помощь мастеров!


14-37369
Jeka
2002-12-24 16:19
2003.01.13
IDE command-line options


3-36946
Matvey
2002-12-18 11:54
2003.01.13
Запрос к БД выборка от начала месяца


14-37316
Сатир
2002-12-23 18:46
2003.01.13
завёлся троян


1-37023
Roman Mironov
2002-12-25 14:56
2003.01.13
Форма поверх всех окон