Виртуальная клавиатура

[mobilitialex]

Всем добрый день!

Написал виртуальную клавиатуру на Delphi, но возникла проблема: не знаю, как перевести фокус нажатия клавиши с моей формы в любую другую программу. Т. е. при нажатии буквы, а она должна отображаться, допустим, в Worde.

Если кто-то знает, как это сделать помогите очень надо.

[Alex2391]

Посмотри здесь, может быть че понадобится
http://www.interface.ru/home.asp?artId=16430

[MyLastHit]

Зачем писать то, что есть по умолчанию в любой версии нормальной ОС?

[Саня_]

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

Зачем писать то, что есть по умолчанию в любой версии нормальной ОС?

хочется человеку, вот и пишет. Всегда нужно с чего-то начинать...

[mobilitialex]

давайте по делу если кто знает пишите

[ArtGrek]

твое окнодолжно быть StayOnTop, потом, после каждого нажатия делаи что б оно теряло фокус,
автоматически он будет передан окну под ним(твое окно не ишезнит StayOnTop)
а ты в ето время передаеш нажатие етои кнопки через SendMessage();

Фокус ввода

Будучи окнами Windows, TWinControl и его потомки должны управлять фокусом ввода (состоянием, когда они получают и обрабатывают входные сообщения). Они имеют предназначенные для этого методы:

Поскольку оконные и неоконные элементы управления фактически находятся в разных списках, эти операции касаются только элементов соответствующего списка. Оконные элементы всегда имеют приоритет над неоконными: вы можете поместить первый над вторым, наоборот — никогда.function Focused: Boolean- Показывает, имеет ли элемент в данный момент фокус ввода.
function CanFocus: Boolean; Возвращает True, если оконный элемент может получить фокус ввода (для этого он и все его родительские оконные элементы управления должны быть активными (Enabled) и видимыми).
procedure SetFocus; Запрашивает у родительской формы получение фокуса ввода.


При получении и утере фокуса оконными компонентами происходят события:
(Pb) property OnEnter: TNotifyEvent;
(Рb) property OnExit: TNotifyEvent;

TNotifyEvent — простейшее событие — извещение, не имеющее параметров. Свойство
(Pb) property TabStop: Boolean;

показывает, есть ли на данном элементе табулостоп. Между элементами формы, у которых TabStop установлено в Тше, можно передвигаться (перемещать фокус ввода) нажатиями клавиш /+. Очередность перехода фокуса определяется специальным списком. Положение элемента управления в родительском списке табулостопов определяется при помощи свойства:
(Pb) property TabOrder: TTabOrder;
TTabOrder = -1..32767;

При разработке формы номера присваиваются последовательно в порядке добавления компонентов, начиная с 0. Нулевой компонент первым получит фокус при активизации. Программист может менять значение этого свойства, не заботясь об учете других элементов, т. к. перенумерация производится автоматически. При отсутствии табулостопа на элементе его свойство TabOrder равно -1.

Можно получить и весь список, содержащий иерархию дочерних элементов, имеющих табулостоп:
procedure GetTabOrderList(List: TList) ;

Этот метод добавляет в уже существующий список List все дочерние компоненты, имеющие табулостоп; каждый из них при добавлении делает то же самое. Таким образом, элементы списка имеют тип TWinControl.

Два метода предназначены для управления показом перекрывающихся дочерних элементов управления:
procedure BringToFront; procedure SendToBack;

Метод BringToFront переносит элемент в конец родительского списка (визуализация начинается с первого) и показывает его поверх остальных. SendToBack, наоборот, переносит элемент в начало и таким образом сверху окажутся все перекрывающиеся с ним. При этом элемент теряет фокус ввода (если имел).

Класс инкапсулирует шрифт Windows. В Delphi допускаются только горизонтально расположенные шрифты. В конструкторе объекта по умолчанию принимается шрифт System цвета clWindowText размера 10 пунктов.
с етого саита http://www.cyberguru.ru/programming/...t1-page20.html

[Пепел Феникса]

одно но, к сожалению событие OnEnter не передает данных от WM_SETFOCUS(там один из параметров это окно, от которого нам перешел фокус ввода, сохранив это можно знать куда вернуть фокус)

[GunSmoker]

http://lmgtfy.com/?q=Delphi+%D1%8D%D...83%D1%80%D0%B0

[mobilitialex]

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

[Giku]

как потерять фокус ???