Монитор

← →
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.

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