Как считать состояние и программно переключить Caps Lock, Num Lock и Scroll Lock?
Для этого надо воспользоваться процедурами API:
которые возвращают и устанавливают, соответственно, состояния всех клавиш. Некоторые коды клавиш приведены ниже:
Пример:
Меняем состояния клавиш Caps Lock, Num Lock и Scroll Lock на противоположное:
procedure GetKeyboardState(var KeyState: TKeyboardState); procedure SetKeyboardState(var KeyState: TKeyboardState);
которые возвращают и устанавливают, соответственно, состояния всех клавиш. Некоторые коды клавиш приведены ниже:
| Клавиша | Код | Клавиша | Код | Клавиша | Код |
| Caps Lock | 020 | Shift | 016 | Insert | 045 |
| NumLock | 144 | Contrl | 017 | Delete | 046 |
| Scroll Lock | 145 | Alt | 018 | Tab | 009 |
Пример:
Меняем состояния клавиш Caps Lock, Num Lock и Scroll Lock на противоположное:
VAR KS: TKeyboardState; begin GetKeyboardState(KS); KS[020] := KS[020] XOR 1; KS[144] := KS[144] XOR 1; KS[145] := KS[145] XOR 1; SetKeyboardState(KS); end;
6351 просмотр | Tags: - Расчет треугольника (13570)
- Калькулятор логических функций (13392)
- Обучающая программа по алгебре "Glance" (5559)
- Таблица умножения в мультфильмах (5441)
- Обучающая программа по арифметике Sapling (3427)
- Тела вращения (Rotation bodies) (2663)
- Магический квадрат (2113)
- Таблица деления в мультфильмах (2042)
- Тестирующая программа по физике PhysicsTest (1786)
- Тестирующая программа по информатике HardTest (1705)
- Тестирующая программа по зоологии AnimalsTest (1653)
- Тестирующая программа по информатике InfTest (1497)
- Тестирующая программа по киноискусству StarsFilmsTest (535)
- Тестирующая программа по звездам эстрады StarsMusicTest (511)
- Тестирующая программа по информатике InfTest (1)
-
Гостевая книгаvitality ed pills cure for ed or natural ed medications treatment for erectile dysfunction or how to get amoxicillin can i buy amoxicillin over the counter or prednisone 20 mg tablets coupon prednisone 5mg coupon or vacuum pump for ed ed pills for sale
-
Гостевая книгаerectile dysfunction medication comparison of ed drugs ed cures that work otc ed pills https://canadianpharmacyvikky.com real viagra without a doctor prescription usa ed aids buy prescription drugs online without herbal remedies for ed
-
Гостевая книгаed medications over the counter canadian pharmacy vikky best ed drugs new erectile dysfunction treatment https://canadianpharmacyvikky.com ed pills online