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

Вниз

NumLock   Найти похожие ветки 

 
Poha ©   (2005-01-27 12:19) [0]

Народ помогите кто знает как узнать горит NumLock или нет. Подскажите какуе - нибудь процедурку или ещё чего - нибудь.


 
Алхимик ©   (2005-01-27 13:02) [1]

http://www.akzhan.midi.ru/devcorner/akdeltnt-content/akdeltnt-008A.html


 
Хруст ©   (2005-02-01 23:53) [2]

на Pascale писали прогу для программного выключения NumLock

var p: ^byte;
begin
    p := ptr(seg0040, $0017);
    p^ := (p^ and $DF);
end


или так

var p: byte;
begin
    p := Mem[seg0040:$0017] and $DF;
    Mem[seg0040:$0017] := p;
end


или же так

var p: byte absolute $0040:$0017;
begin
    p := p and $DF;
end


 
Хруст ©   (2005-02-01 23:53) [3]

на Pascale писали прогу для программного выключения NumLock

var p: ^byte;
begin
    p := ptr(seg0040, $0017);
    p^ := (p^ and $DF);
end


или так

var p: byte;
begin
    p := Mem[seg0040:$0017] and $DF;
    Mem[seg0040:$0017] := p;
end


или же так

var p: byte absolute $0040:$0017;
begin
    p := p and $DF;
end



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

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

Наверх




Память: 0.47 MB
Время: 0.051 c
3-1108361995
Некто
2005-02-14 09:19
2005.03.13
Запросы от многих пользователей


14-1108885880
AlterEgo of WondeRu
2005-02-20 10:51
2005.03.13
что выбрать для написания виртуального драйвера?


3-1108095477
КиТаЯц
2005-02-11 07:17
2005.03.13
FireBird. Селект с днями недели


6-1105344825
ctranik
2005-01-10 11:13
2005.03.13
Вопрос по TIdHttp


1-1109670882
Ivolg
2005-03-01 12:54
2005.03.13
Ошибка