Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Смена раскладки клавиатуре в системе [D7, WinXP]

Ford © (2007-04-27 16:24:00)
День добрый, подскажите пожалуйста. Как можно поменять схему раскладки клавиатуры в системе?

Ketmar (2007-04-30 19:56:00) [1]
а чего бы не использовать WM_CHAR? зачем играться с переключениями?

rar (2007-04-30 19:29:00) [2]
извиняюсь не то скопировал

procedure SetRU;
var
Layout: array [0.. KL_NAMELENGTH] of char;
begin
LoadKeyboardLayout(StrCopy(Layout, '00000419'), KLF_ACTIVATE);
end;

procedure SetEN;
var
Layout: array [0.. KL_NAMELENGTH] of char;
begin
LoadKeyboardLayout(StrCopy(Layout, '00000409'), KLF_ACTIVATE);
end;

rar (2007-04-30 19:15:00) [3]
procedure TForm1.Timer1Timer(Sender: TObject);
var
Layout: array [0.. KL_NAMELENGTH] of char;
begin
GetKeyboardLayoutName(Layout);
if Layout = '00000409' then
label1.caption:='en'
else
label1.caption:='ru';
end;

Ford (2007-04-30 14:31:00) [4]
>> Мне вот такие программисты, которые понапишут шаловливые программки, а мне потом клиенты звонить будут: "У меня не переключается"

я совета, просил, а не паранои

iXT (2007-04-28 09:37:00) [5]
Мне вот такие программисты, которые понапишут шаловливые программки, а мне потом клиенты звонить будут: "У меня не переключается"

Ford (2007-04-28 06:58:00) [6]
>> Выбор "раскладки" (языка) - пользовательская привелегия! Руки надо за это отрывать!

кто тебе мешает

>>зачем?
>>русские буковки не вставляются?

мне надо с эмулировать нажатия клавиш на английской раскладке, в другой программе, а так как по умолчанию в системе стоит русский, то при фокусировании на другой программе включаеться язык по умолчаннию. Надо сменить язык на английский язык.

clickmaker (2007-04-27 17:44:00) [7]

> как поменять раскладку в другой программе

зачем?
русские буковки не вставляются?

iXT (2007-04-27 17:37:00) [8]
Выбор "раскладки" (языка) - пользовательская привелегия! Руки надо за это отрывать!

Ford (2007-04-27 17:13:00) [9]
поставлю вопрос по другому, как поменять раскладку в другой программе

Ford (2007-04-27 17:02:00) [10]
Функция ActivateKeyboardLayout устанавливает язык ввода для текущего потока. Мне надо поменять в системе, возможно это делаеться в реестре, тока хз какая ветвь

Elen (2007-04-27 16:58:00) [11]

> надо поменять язык ввода в системе поумолчанию

Ну вообще смена раскладки если не ошибаюсь делается через функцию API ActivateKeyboardLayout.

Ford (2007-04-27 16:54:00) [12]
люди плиз помогите, сильно надо

Ford (2007-04-27 16:42:00) [13]
не правильно выразился, надо поменять язык ввода в системе поумолчанию

Правильный Вася (2007-04-27 16:39:00) [14]
вместо энтера пробел, что ли?
отверткой попробуй

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »