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

Вниз

Как узнать текущюю раскладку клавиатуры? В Факе вроде нет...   Найти похожие ветки 

← →
DillerXX ©   (2003-11-18 21:24) [0]

Как узнать текущюю раскладку клавиатуры? В Факе вроде нет...

---

← →
Rouse_ ©   (2003-11-19 00:11) [1]

Ну например так:

procedure TForm1.FormCreate(Sender: TObject);
var
Buf: array [0..7] of Char;
begin
GetKeyboardLayoutName(@Buf);
Caption := String(Buf);
end;

Желаю успехов

---

← →
DillerXX ©   (2003-11-19 15:05) [2]

C/7ACUBA :)

---

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

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

Наверх

Память: 0.46 MB
Время: 0.022 c