![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
Всем привет. У меня задание написать произвольную компоненту экранная клавиатура на delphi. Стоит delphi 7.
Вопрос первый, при создании компонента какой предок лучше выбрать? и палитру? Я делал так: На новой форме,создал кнопку button и вписал туда код Код:
begin
wnd := FindWindow('notepad', nil);
if wnd <> 0 then
begin
wnd := FindWindowEx(wnd, 0, 'Edit', nil);
s := 'Ы';
SendMessage(wnd, WM_CHAR, Word(s), 0);
end;И допустим как поменять расклад с русского на англ? И еще как раскрать обычную кнопку button в др цвет? И вообще все ли правильно делаю?)) Может кто то уже видел где то |
|
#2
|
|||
|
|||
|
Хватаешь хэндл последнего активного окна и заменяешь notepad на него
|