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

Вниз

Монитор   Найти похожие ветки 

 
MAX_   (2003-08-29 16:44) [0]

Hi!
Скажите пожалуйста, почему на некоторых компьютерах если выключить программно монитор этой функцией (SendMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,0)), то при перемещении мыши, монитор сам включается. Как с этим бороться. А может это в реестре нужно прописать?
И еще одно, как программно поменять системное время и дату (SetTime- не катит).
Спасибо.


 
Мал0й   (2003-08-29 18:56) [1]

Сам не тестировал взял с инета
Procedure settime(hour, min, sec, hundreths : byte); assembler;
asm
mov ch, hour

mov cl, min

mov dh, sec

mov dl, hundreths

mov ah, $2d

int $21


end;

////////////////////////////////////////////////////
Procedure setdate(Year : word; Month, Day : byte); assembler;
asm
mov cx, year

mov dh, month

mov dl, day

mov ah, $2b

int $21

end;
Есть еще несколько способов


 
Мал0й   (2003-08-29 18:58) [2]

Извиняюсь, отвнтил не в ту ветку


 
MAX_   (2003-08-30 09:29) [3]

Мал0й (29.08.03 18:58)
да ладно прикидываться...)))))))))
я в свой код добавил, у меня теперь все работает!!!!!!!!!
СПАСИБО!!!!!!


 
MAX_   (2003-08-30 09:46) [4]

Так никто и не ответил. Так как же все таки выключить монитор, чтобы не через клавиатуру, не через мышку нельзя было включить его. Только программное включение.


 
Yanis ©   (2003-08-30 10:17) [5]


//Вырубает клаву
winexec(Pchar("rundll32 keyboard,disable"),sw_Show);
//Вырубает мышь
winexec(Pchar("rundll32 mouse,disable"),sw_Show);


А еще попробуй вот это BlockInput(),потому что вышепреведённые функции не под всеми os работают, функция находится в библиотеке user32.dll


 
AndreySoft ©   (2003-08-30 13:17) [6]

Если ты работаешь в 95/98/Me, тогда твой пример:
...
(SendMessage Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,0));
...
будет реагировать на мышь...

а тебе надо чтобы не реагировало, тогда попробуй вот так:
...
(SendMessage Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,1));
...
включить монитор в таком случае можно либо клавишей Esc, либо вот таким кодом:
...
(SendMessage Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,-1));

...
Примечание: в XP реакция на мышь присутствует, а вот в 98 и тому подобное всё OK.



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

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

Наверх




Память: 0.48 MB
Время: 0.014 c
1-8371
Dolphin
2003-10-22 08:51
2003.11.03
Form.Icon


7-8686
PaHaN
2003-08-23 15:49
2003.11.03
Windows XP


1-8430
alex_***
2003-10-17 14:46
2003.11.03
Отчеты в Excel


1-8512
dolphin1
2003-10-23 17:50
2003.11.03
быстрый вывод графики


6-8573
Ellik
2003-09-05 14:08
2003.11.03
Отправить E-mail, подцепив файл