-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242

Индикатор раскладки

24.06.2018, 22:13. Показов 2418. Ответов 18
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
На клавиатуре есть световой индикатор, который не используется: крайний правый. Какой код, чтобы этот индикатор горел, когда раскладка русская и не горел, когда английская? Сторонние проги ставить не хочу.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
24.06.2018, 22:13
Ответы с готовыми решениями:

Название раскладки
Персидская, например, "fa-IR", а как другие? Где посмотреть?

Смена раскладки клавиатуры
private void Form1_Load(object sender, EventArgs e) { HotKeysManager manager = new HotKeysManager(); ...

Изменение символов текста в зависимости от раскладки
Хочу написать программу которая переводит текст, ошибочно написанный в неправильной раскладке, в правильную. Этот вопрос поднимался здесь...

18
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
24.06.2018, 23:35
Цитата Сообщение от Passerby Посмотреть сообщение
На клавиатуре есть световой индикатор, который не используется: крайний правый.
Это ScrollLock и он используется. Одноименная кнопка его переключает.

Цитата Сообщение от Passerby Посмотреть сообщение
Какой код, чтобы этот индикатор горел, когда раскладка русская и не горел, когда английская?
Комбинация советов из Find out when keyboard layout is changed и Faking num lock, caps lock and scroll lock leds должна помочь.
0
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
25.06.2018, 01:30  [ТС]
OwenGlendower, спасибо. А что нужно добавить в проект по вашей последней ссылке, чтобы VS не ругался на CreateFile, IOCTL_KEYBOARD_SET_INDICATORS и какие типы указать при импортировании DeviceIoControl https://msdn.microsoft.com/en-... s.85).aspx
0
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
25.06.2018, 01:49
Passerby, добавление следующих деклараций должно помочь
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
[DllImport("kernel32.dll", CharSet = CharSet.Auto, SetLastError = true)]
public static extern SafeFileHandle CreateFile(
    [MarshalAs(UnmanagedType.LPTStr)] string filename,
    [MarshalAs(UnmanagedType.U4)] FileAccess access,
    [MarshalAs(UnmanagedType.U4)] FileShare share,
    IntPtr securityAttributes, // optional SECURITY_ATTRIBUTES struct or IntPtr.Zero
    [MarshalAs(UnmanagedType.U4)] FileMode creationDisposition,
    [MarshalAs(UnmanagedType.U4)] FileAttributes flagsAndAttributes,
    IntPtr templateFile
);
 
[DllImport("Kernel32.dll", SetLastError = false, CharSet = CharSet.Auto)]
static extern bool DeviceIoControl(
    Microsoft.Win32.SafeHandles.SafeFileHandle hDevice,
    uint IoControlCode,
    [In] ref KeyboardIndicatorParameters InBuffer,
    uint nInBufferSize,
    [MarshalAs(UnmanagedType.AsAny)]
    [Out] object OutBuffer,
    uint nOutBufferSize,
    out uint pBytesReturned,
    IntPtr lpOverlapped
);
Собрал их на основе информации с сайта http://pinvoke.net/
1
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
25.06.2018, 02:07  [ТС]
Помогло. Только на IOCTL_KEYBOARD_SET_INDICATORS еще выдается ошибка.
0
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
25.06.2018, 12:55
Passerby, какая ошибка?
0
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
25.06.2018, 21:07  [ТС]
Ошибки нет. Это я что-то нужное закомментировал. А какое событие происходит при переключении раскладки нажатием Alt+Shift? И как сделать программу фоновой?

Добавлено через 3 часа 6 минут
Похоже в консоли нет события нажатия клавиши. Будет ли событие WM_INPUTLANGCHANGE перехватываться в фоновой программе?
0
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
26.06.2018, 22:33
Цитата Сообщение от Passerby Посмотреть сообщение
Будет ли событие WM_INPUTLANGCHANGE перехватываться в фоновой программе?
Будет, если там есть цикл обработки сообщений Windows
1
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
27.06.2018, 00:08  [ТС]
Как сделать эту программу фоновой с циклом обработки сообщений Windows?
0
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
05.07.2018, 18:46  [ТС]
Почему-то не срабатывает GetKeyboardLayout();? Хоть русская раскладка, хоть английская все равно возвращает 0.

C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
using Microsoft.Win32.SafeHandles;
using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Runtime.InteropServices;
using System.Text;
using System.Threading.Tasks;
 
namespace ConsoleApp1
{
    class Program
    {
        static uint ControlCode(uint deviceType, uint function, uint method, uint access)
        {
            return ((deviceType) << 16) | ((access) << 14) | ((function) << 2) | (method);
        }
        private static uint IOCTL_KEYBOARD_SET_INDICATORS = ControlCode(FileDeviceKeyboard, 0x0002, MethodBuffered, FileAnyAccess);
        private const uint FileAnyAccess = 0;
        private const uint MethodBuffered = 0;
        private const uint FileDeviceKeyboard = 0x0000000b;
        private const int DddRawTargetPath = 0x00000001;
 
        [DllImport("kernel32.dll", CharSet = CharSet.Auto, SetLastError = true)]
        public static extern SafeFileHandle CreateFile(
     [MarshalAs(UnmanagedType.LPTStr)] string filename,
     [MarshalAs(UnmanagedType.U4)] FileAccess access,
     [MarshalAs(UnmanagedType.U4)] FileShare share,
     IntPtr securityAttributes, // optional SECURITY_ATTRIBUTES struct or IntPtr.Zero
     [MarshalAs(UnmanagedType.U4)] FileMode creationDisposition,
     [MarshalAs(UnmanagedType.U4)] FileAttributes flagsAndAttributes,
     IntPtr templateFile
 );
        [DllImport("Kernel32.dll", SetLastError = false, CharSet = CharSet.Auto)]
        static extern bool DeviceIoControl(
            Microsoft.Win32.SafeHandles.SafeFileHandle hDevice,
            uint IoControlCode,
            [In] ref KeyboardIndicatorParameters InBuffer,
            uint nInBufferSize,
            [MarshalAs(UnmanagedType.AsAny)]
    [Out] object OutBuffer,
            uint nOutBufferSize,
            out uint pBytesReturned,
            IntPtr lpOverlapped
        );
 
        [DllImport("kernel32.dll")]
        static extern bool DefineDosDevice(uint dwFlags, string lpDeviceName, string lpTargetPath);       
        public static void ToggleLights(Locks locks)
        {
            DefineDosDevice(DddRawTargetPath, "keyboard", "\\Device\\KeyboardClass0");
 
            var indicators = new KeyboardIndicatorParameters();
 
            using (var hKeybd = CreateFile("\\\\.\\keyboard", FileAccess.Write, 0, IntPtr.Zero, FileMode.Open, 0, IntPtr.Zero))
            {
                indicators.UnitId = 0;
                indicators.LedFlags = locks;
 
                var size = Marshal.SizeOf(typeof(KeyboardIndicatorParameters));
 
                uint bytesReturned;
                DeviceIoControl(hKeybd, IOCTL_KEYBOARD_SET_INDICATORS, ref indicators, (uint)size,
                    IntPtr.Zero, 0, out bytesReturned, IntPtr.Zero);
            }
        }
 
        public void OnKeyPress()
        {
 
            //this.KeyPress += new KeyPressEventHandler(key_Down);
 
        }
        struct KeyboardIndicatorParameters
        {
            public ushort UnitId;
            public Locks LedFlags;
        }
 
        [Flags]
        public enum Locks : ushort
        {
            None = 0,
            KeyboardScrollLockOn = 1,
            KeyboardNumLockOn = 2,
            KeyboardCapsLockOn = 4
        }
        [DllImport("user32.dll")]
        public static extern bool RegisterHotKey(IntPtr hWnd, int id, int fsModifiers, int vlc);
        [DllImport("user32.dll")]
        public static extern bool UnregisterHotKey(IntPtr hWnd, int id);
 
        const int MYACTION_HOTKEY_ID = 1;
        [DllImport("user32.dll", SetLastError = true)]
        static extern int GetWindowThreadProcessId(
                    [In] IntPtr hWnd,
                    [Out, Optional] IntPtr lpdwProcessId
                    );
 
        [DllImport("user32.dll", SetLastError = true)]
        static extern IntPtr GetForegroundWindow();
 
        [DllImport("user32.dll", SetLastError = true)]
        static extern ushort GetKeyboardLayout(
            [In] int idThread
            );
 
        /// <summary>
        /// Вернёт Id раскладки.
        /// </summary>
        ushort GetKeyboardLayout()
        {
            return GetKeyboardLayout(GetWindowThreadProcessId(GetForegroundWindow(), IntPtr.Zero));
        }
        static void Main(string[] args)
        {
            Program p = new Program();
            ushort u= p.GetKeyboardLayout();
            Console.WriteLine(u);
           // Environment.
            // Modifier keys codes: Alt = 1, Ctrl = 2, Shift = 4, Win = 8
            // Compute the addition of each combination of the keys you want to be pressed
            // ALT+CTRL = 1 + 2 = 3 , CTRL+SHIFT = 2 + 4 = 6...
            ToggleLights(Locks.KeyboardScrollLockOn);                   
 
        }
    }
}
0
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
06.07.2018, 17:20
Passerby, у меня работает. Единственное что я бы поправил это объявления GetKeyboardLayout
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
        [DllImport("user32.dll", SetLastError = true)]
        static extern IntPtr GetKeyboardLayout(
            [In] int idThread
            );
 
        /// <summary>
        /// Вернёт Id раскладки.
        /// </summary>
        ushort GetKeyboardLayout()
        {
            IntPtr layout = GetKeyboardLayout(GetWindowThreadProcessId(GetForegroundWindow(), IntPtr.Zero));
            return (ushort)layout.ToInt32();
        }
0
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
06.07.2018, 17:48  [ТС]
Что у вас печатается в консоли? У меня по-прежнему 0 вне зависимости от раскладки. Запускаю в VS. Код исправил на ваш.
0
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
06.07.2018, 17:55
Passerby, в консоли всегда 1033 независимо от раскладки, а в GUI 1033 (EN) или 1049 (RU).
0
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
06.07.2018, 18:08  [ТС]
Вы ее в Visual Studio запускаете? Сделали GUI проект?
0
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
06.07.2018, 18:14
Цитата Сообщение от Passerby Посмотреть сообщение
Вы ее в Visual Studio запускаете?
Да.

Цитата Сообщение от Passerby Посмотреть сообщение
Сделали GUI проект?
Нет. GUI вариант проверял в LINQPad.
0
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
06.07.2018, 18:23  [ТС]
У меня нет LINQPad и никогда этим средством не пользовался и не представляю как консольную программу можно где-то запустить, кроме консоли. А фоновой программу сделать сложно?
0
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
06.07.2018, 20:01
Цитата Сообщение от Passerby Посмотреть сообщение
А фоновой программу сделать сложно?
Несложно. Создаем новое консольое приложение, меняем тип на Windows Application, добавляем ссылку на System.Windows.Forms, в методе Main пишем
C#
1
Application.Run();
Перед этим устанаваливаем необходимые хуки.
0
-7 / 3 / 1
Регистрация: 22.09.2017
Сообщений: 242
06.07.2018, 23:20  [ТС]
Создал. В свойствах заменил на Приложение Windows. Что нужно сделать, чтобы не было ошибки при добавлении в Main
Application.Run(); Что такое хуки?
0
Администратор
Эксперт .NET
 Аватар для OwenGlendower
18310 / 14234 / 5368
Регистрация: 17.03.2014
Сообщений: 28,905
Записей в блоге: 1
07.07.2018, 00:07
Цитата Сообщение от Passerby Посмотреть сообщение
Что нужно сделать, чтобы не было ошибки при добавлении в Main Application.Run();
Добавить ссылку на System.Windows.Forms и аналогичный using

Цитата Сообщение от Passerby Посмотреть сообщение
Что такое хуки?
То что тебе понадобится для отслеживания именения раскладки клавиатуры. Они упоминаются в ссылке Find out when keyboard layout is changed.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
07.07.2018, 00:07
Помогаю со студенческими работами здесь

Языковые настройки. Добавление украинской раскладки
Всем привет! Друзья, есть такая вот проблемка. Пользуюсь на рабочем компьютере 2мя языковыми раскладками - русской и английской....

Определение латинской раскладки и оповещение пользователя об этом
Доброго дня! Помогите, пожалуйста. У меня имеется программа, работающая с архивом запросов. Необходимо, чтобы пользователи поисковой...

Как изменить текст при изменении раскладки клавиатуры
Задался вопросом как изменить текст при изменении раскладки клавиатуры, т.е. если написано &quot;ghbdtn&quot; то нажатии кнопки должен...

Поиск в строках массива текста вне зависимости от используемой раскладки
Ситуация такая: пользователю дана возможность в textBox вводить данные. Необходимо осуществить поиск этих данных в строках массива. ...

Индикатор загрузки ЦП
Помогите реализовать c помощью ProcessBar загрузку ЦП. И ProcessBar должен находиться в StatusStrip.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
19
Ответ Создать тему
Опции темы

Новые блоги и статьи
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru