|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Посмотрите это пожалуйста
Здрасьте Форумяне !
у меня такая проблема : Пишу я кароче такую прогу которая должна показывать раскладку клавиатуры "Русский или Английский " , я делаю это с компонентом tray icon тоисть этот трей икон показывает мне в трее какой язык стоит как и у винды в трее . Вот сам код который меняет язык : procedure TForm1.Button1Click(Sender: TObject); begin ActivateKeyboardLayout(HKL_NEXT, 0); end; procedure TForm1.Button2Click(Sender: TObject); begin ActivateKeyboardLayout(LoadKeyboardLayout('0000041 9', 0), 0); end; Я бы хотел что бы это влияло на все приложения которые я запустил а эта прога меняет только в нутри себя язык! помогите люди добрые ! |