Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.11;
Скачать: CL | DM;

Вниз

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

 
ЛамерОК   (2002-01-10 23:29) [0]

Мне надо на Label вывести язык, который сейчас используется. Я нашел что-то в справке, но не пойму какое значение вписать:
GetKeyboardLayoutName(); Если нужна другая ф-ция подскажите! Помогите мне, я ламер!!!


 
Igor_thief ©   (2002-01-11 12:50) [1]

Пиши короче вот так:
LoadKeyboardLayout("00000409", KLF_ACTIVATE); // английский
LoadKeyboardLayout("00000419", KLF_ACTIVATE); // русский
а изминение языка, надо ловить WM_INPUTLANGCHANGEREQUEST


 
Вадим ©   (2002-01-11 21:40) [2]

function GetLanguage: string;
var
p: PChar;
begin
GetMem(p, KL_NAMELENGTH);
try
GetKeyboardLayoutName(p);
Result := p;
finally
FreeMem(p, KL_NAMELENGTH);
end;
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.015 c
1-32439
Light Elf
2002-02-22 13:52
2002.03.11
Жирный текст в Popup меню.


3-32424
Johnmen
2002-02-11 12:57
2002.03.11
Проблема с триггером


1-32509
Igor_
2002-02-25 12:50
2002.03.11
Как определить сколько дней в заданном месяце


6-32535
DELPHIMUN
2001-11-27 12:21
2002.03.11
Как отправить почту без всяких там Outlook Express?


3-32425
JEff
2002-02-04 19:02
2002.03.11
Ребята!!! У меня к вам вопросик (дилетантского хар-ра)