Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];




Вниз

Раскладка клавиатуры 


rundll32   (2002-03-20 20:46) [0]

Подск4ажите пожалуйста как менять раскладку не в своей проге, а во всех...т.е. надо послать сообщение, чтобы например во всех окнах переключилась на ENGLISH или RUSSIAN...
Привычные методы меняют ее только у меня в окне, но не больше...



lipskiy   (2002-03-20 20:54) [1]

Не то?

Программное переключение раскладок клавиатуры
procedure TForm1.Button1Click(Sender: TObject);//На русский
var Layout: array [0.. KL_NAMELENGTH] of char;
begin
LoadKeyboardLayout( StrCopy(Layout,"00000419"),KLF_ACTIVATE);
end;

procedure TForm1.Button2Click(Sender: TObject);//На английский
var Layout: array [0.. KL_NAMELENGTH] of char;
begin
LoadKeyboardLayout(StrCopy(Layout,"00000409"),KLF_ACTIVATE);
end;



Vampire   (2002-03-20 21:10) [2]

нет...
Это не работает за пределами моей программы, мне нужно чтобы раскладка изменилась во всех окнах...



vampire   (2002-03-21 08:14) [3]

А возможно вообще изменить раскладку за пределами моей проги?




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.016 c
1-232             cok                   2002-03-20 18:36  2002.04.01  
Tray


1-122             snoup                 2002-03-21 16:54  2002.04.01  
Как сделать что бы при нажатие на кнопку создавался BAT-файл?


7-335             Filat                 2001-12-19 15:45  2002.04.01  
Как переделать или втавить программу с ASM на Дельфи - цифровой вольтметр.


3-10              Draculenok            2002-03-05 13:28  2002.04.01  
Почему не работает( или чего-то не хватает?)


1-187             Aleksandr             2002-03-19 18:46  2002.04.01  
Почему не убивается нажатие клавиши?