Форум: "Система";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
ВнизИзменение раскладки Найти похожие ветки
← →
Disa (2003-05-22 07:50) [0]Как мне изменить раскладку клавиатуры из моей программы?
← →
MBo (2003-05-22 07:52) [1]Loadkeyboardlayout
Ответ на соседний вопрос- в хелпе See Also
← →
Disa (2003-05-22 07:58) [2]А в хелпе этого НЕТ :(
← →
DarkGreen (2003-05-22 08:47) [3]Это есть в MS SDK Help Files (входив в поставку делфей)
← →
Jeca57 (2003-05-22 14:18) [4]LoadKeyboardLayout("00000409", KLF_ACTIVATE); // английский
LoadKeyboardLayout("00000419", KLF_ACTIVATE); // русский
← →
AbrosimovA (2003-05-23 11:42) [5]Можно также добавить отображение в 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;
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c