Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как определить раскладку клавиатуры [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 разве нету?


Наверх

Титульная страница Поиск, карта сайта Написать письмо