![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как определить раскладку клавиатуры [D6, D7, Win95/98, NT4]
miska © (2003-02-22 11:31:00)Как программно определить раскладку клавиатуры?
DALEX31 (2003-02-24 02:23:00) [1]>>> Cobalt!
А ты, кстати, прав :)
Cobalt (2003-02-23 23:22:00) [2]:) 419->RU
DALEX31 (2003-02-22 21:09:00) [3]Держи на здоровье!!
procedure TForm1.TabSheet4Show(Sender: TObject);
Var NameLang: Array[0..4] of char;
begin
GetKeyboardLayoutName(NameLang);
StaticText26.Caption:=strPas(NameLang);
//00000409 --> EN 00000409 --> RU
end;
Удачи :))
MBo (2003-02-22 11:51:00) [4]в FAQ разве нету?