Текущий язык системы.

[lev]

было похожее на форуме
Раскладка и Аксапта
Как переключить раскладку клавиатуры

[GBH]

Цитата:

Сообщение от lev

было похожее на форуме
Раскладка и Аксапта
Как переключить раскладку клавиатуры

Спасибо за ответ!
Но вопрос в том как получить текущее значение раскладки, а не как переключить. Все эти темы я читал.

То что смог найти подходит, вроде, вот это

Функция GetKeyboardLayoutName извлекает данные о названии активной раскладки символов на клавиатуре.......

Но вот как её использовать я пока не понял.

[samolalex]

В общем-то вот, что получилось:

server static void getLanguage()
{
    dll dll = new dll("user32");
    dllFunction GetKeyboardLayout = new dllFunction(dll, "GetKeyboardLayout");
    #define.RU("68748313")
    #define.EN("67699721")
    ;

    GetKeyboardLayout.arg(ExtTypes::DWORD);
    GetKeyboardLayout.returns(ExtTypes::DWORD);

    if(value2string(GetKeyboardLayout.call(0)) == #RU)
    {
        info("RU");
    }
    else
    {
        info("EN");
    }
}

[GBH]

Цитата:

Сообщение от samolalex

В общем-то вот, что получилось:

server static void getLanguage()
{
    dll dll = new dll("user32");
    dllFunction GetKeyboardLayout = new dllFunction(dll, "GetKeyboardLayout");
    #define.RU("68748313")
    #define.EN("67699721")
    ;

    GetKeyboardLayout.arg(ExtTypes::DWORD);
    GetKeyboardLayout.returns(ExtTypes::DWORD);

    if(value2string(GetKeyboardLayout.call(0)) == #RU)
    {
        info("RU");
    }
    else
    {
        info("EN");
    }
}

Этот вариант получился полностью!

Всем огромное спасибо. Тему можно закрывать.

P.S. Только вместо value2string использовать надо int2str

[lev]

получилось получить текущею раскладку в числовом виде, но никак не могу перевести его на читабельный вариант. может у вас получится
вот код:

    DLL             DLL;
    DLLFunction     DLLFunction;
    ;

    #WinAPI

    DLL = new DLL('user32.dll');
    DLLFunction = new DLLFunction(DLL,'GetKeyboardLayout');

    DLLFunction.arg(ExtTypes::DWord);
    DLLFunction.returns(ExtTypes::DWord);
                   
    info(DLLFunction.call(0));

[GBH]

Цитата:

Сообщение от lev

получилось получить текущею раскладку в числовом виде, но никак не могу перевести его на читабельный вариант. может у вас получится
вот код:

    DLL             DLL;
    DLLFunction     DLLFunction;
    ;

    #WinAPI

    DLL = new DLL('user32.dll');
    DLLFunction = new DLLFunction(DLL,'GetKeyboardLayout');

    DLLFunction.arg(ExtTypes::DWord);
    DLLFunction.returns(ExtTypes::DWord);
                   
    info(DLLFunction.call(0));

Огромное спасибо!
Сейчас буду думать дальше!