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

Вниз

раскладка   Найти похожие ветки 

← →
esprit_bel   (2002-06-01 10:12) [0]

Как сменить раскладку клавы из проги.Если можно подробнее.

---

← →
Song   (2002-06-01 10:26) [1]

ActivateKeyboardLayout()

---

← →
MARcoDEN   (2002-06-01 10:41) [2]

procedure TForm1.Button1Click(Sender: TObject);//На русский
var
Layout: array[0.. KL_NAMELENGTH] of char;
begin
LoadKeyboardLayout( StrCopy(Layout,"00000419"),KLF_ACTIVATE);
end;

procedure TForm1.Button2Click(Sender: TObject);//На английский
var
Layout: array[0.. KL_NAMELENGTH] of char;
begin
LoadKeyboardLayout(StrCopy(Layout,"00000409"),KLF_ACTIVATE);
end;

---

Страницы: 1 вся ветка

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

Наверх

Память: 0.44 MB
Время: 0.091 c