Текущий архив: 2003.04.21;
Скачать: CL | DM;

Вниз

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

← →
miska   (2003-02-22 11:31) [0]

Как программно определить раскладку клавиатуры?

---

← →
MBo ©   (2003-02-22 11:51) [1]

в FAQ разве нету?

---

← →
DALEX31   (2003-02-22 21:09) [2]

Держи на здоровье!!

procedure TForm1.TabSheet4Show(Sender: TObject);
Var NameLang: Array[0..4] of char;
begin
GetKeyboardLayoutName(NameLang);
StaticText26.Caption:=strPas(NameLang);
//00000409 --> EN 00000409 --> RU
end;
Удачи :))

---

← →
Cobalt ©   (2003-02-23 23:22) [3]

:) 419->RU

---

← →
DALEX31   (2003-02-24 02:23) [4]

>>> Cobalt!
А ты, кстати, прав :)

---

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

Текущий архив: 2003.04.21;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.018 c