VPF::Узнать и поменять раскладку - Форум программистов

Bog d`An

Дата 29.12.2006, 03:14 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 217
Регистрация: 26.3.2005
Где: Украина:Днепропет ровск

Репутация: нет
Всего: 3

Вот такой вот простой вопрос.
Собственно, надо перенести такие ф-и:

Код


procedure SetLenguage(CodePage:String);
var
  Layout: array[0.. KL_NAMELENGTH] of char;
begin
  LoadKeyboardLayout(StrCopy(Layout,PChar(CodePage)),KLF_ACTIVATE);//На русский  00000419 // На английский 00000409
end;

Function GetLenguage:String;
var 
  RA: Array[0..$FFF] of Char; 
begin 
 GetKeyboardLayoutName(RA) ;  
 Result:= StrPas(RA);
end;

добавлено позже:
C#

Это сообщение отредактировал(а) Bog d`An - 29.12.2006, 12:07

--------------------

Удача откроет двери даже там, где их нет.Генри Морган--------------------[Furry team][Agent`s team][СРУКер]

Bishop

Дата 2.1.2007, 20:39 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 188
Регистрация: 3.6.2005
Где: Минск, Беларусь

Репутация: 6
Всего: 16

Работаем с классом InputLanguage

Код


string GetLanguage()
{
    return InputLanguage.CurrentInputLanguage.LayoutName;
}

Код


void SetLanguage(int id)
{
    CultureInfo ci = new System.Globalization.CultureInfo(id);
    InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(ci);
}
void SetLanguage(string str) // в виде "ru-RU"
{
    CultureInfo ci = new System.Globalization.CultureInfo(str);
    InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(ci);
}

Хотя возможно, правильнее делать как-то так:

Код


bool SetLanguage(int id)
{
    for (int i = 0; i < InputLanguage.InstalledInputLanguages.Count; i++)
    {
        if (InputLanguage.InstalledInputLanguages[i].Culture.LCID == id)
        {
            InputLanguage.CurrentInputLanguage =
                InputLanguage.InstalledInputLanguages[i];
            return true;
        }
    }
    return false;
}

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Общие вопросы по .NET и C# \| Следующая тема »