Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Вниз

Ничего не понимаю 


Вадим   (2002-01-03 16:19) [0]

Положил на форму RxRichEdit и делаю так:

function SuperPuperFunc: string;
var
Buff: array [0..KL_NAMELENGTH] of Char;
begin
GetKeyboardLayoutName(Buff);
Result := Buff;
end;

Здесь HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Keyboard Layouts сказано, что русскому языку соответствует 00000419, но когда в RxRichEdit русская раскладка, функция возвращает 00000409, что соответствует американской раскладке. Что я делаю не правильно?



Vovchik   (2002-01-03 19:14) [1]

Трудно сказать, что не правильно. Я пробовал то же самое, у меня всё правильно отработало. Вот только, не очень понял, что имеется ввиду "в RxRichEdit русская раскладка". Вообще, раскладка имеет смысл для процесса, а не контрола.



Вадим   (2002-01-03 20:39) [2]

Ну, я это и имел в виду :). Я хотел сказать, что в RxRichEdit набор текста идет русскими буквами.



Вадим   (2002-01-03 21:04) [3]

Все, разобрался.
Я ловил WM_INPUTLANGCHANGEREQUEST и сначала узнавал раскладку, а потом делал inherited, а надо наоборот.




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.025 c
1-9213            wicked                2002-02-14 10:47  2002.03.04  
hash-функция


1-9176            programmer1           2002-02-12 10:22  2002.03.04  
Смысл типа TVarBytesField


1-9132            Fast                  2002-02-17 09:45  2002.03.04  
Элементарная вещь


4-9327            Fellomena             2002-01-04 12:29  2002.03.04  
RichEdit1.SelAttributes.Color := $000FFF; - есть альтернативы для одного символа в строке ?


4-9352            BH                    2002-01-04 09:00  2002.03.04  
Перемещение файлов и папок