![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Изменение раскладки [D6, WinXP]
Disa © (2003-05-22 07:50:00)Как мне изменить раскладку клавиатуры из моей программы?
AbrosimovA (2003-05-23 11:42:00) [1]Можно также добавить отображение в StatusBar текущую раскладку.
procedure TMainForm.Timer1Timer(Sender: TObject);
var s: array [0..8] of char;
begin
GetKeyboardLayoutName(s);
if s="00000419" then StatusBar1.Panels[0].Text:= "RU";
if s="00000409" then StatusBar1.Panels[0].Text:= "EN";
end;
Jeca57 (2003-05-22 14:18:00) [2]LoadKeyboardLayout("00000409", KLF_ACTIVATE); // английский
LoadKeyboardLayout("00000419", KLF_ACTIVATE); // русский
DarkGreen (2003-05-22 08:47:00) [3]Это есть в MS SDK Help Files (входив в поставку делфей)
Disa (2003-05-22 07:58:00) [4]А в хелпе этого НЕТ :(
MBo (2003-05-22 07:52:00) [5]Loadkeyboardlayout
Ответ на соседний вопрос- в хелпе See Also