[klmmn]

Я предполагаю такую организацию запуска этого процесса... Есть некий элемент управления на форме. Навести на него указатель мыши, нажать левую клавишу, перетянуть и отпустить над заголовком окна внешней программы, за изменениями которого нужно следить.

(далее суть вопроса) Когда отпускается кнопка мыши, должен активизироваться процесс слежение за изменениями заголовка - изменение заголовка должно обрабатываться далее в программе и т.д..

Каким образом это осуществить? Можно ли обойтись только средствами Delphi?

[Janom]

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

Я предполагаю такую организацию запуска этого процесса... Есть некий элемент управления на форме. Навести на него указатель мыши, нажать левую клавишу, перетянуть и отпустить над заголовком окна внешней программы, за изменениями которого нужно следить.

(далее суть вопроса) Когда отпускается кнопка мыши, должен активизироваться процесс слежение за изменениями заголовка - изменение заголовка должно обрабатываться далее в программе и т.д..

Каким образом это осуществить? Можно ли обойтись только средствами Delphi?

Вот как-то так...

[klmmn]

Как получить дескриптор и по нему заголовок окна - с этим всё понятно. Вопрос в другом - как сделать, так что бы программа сама отслеживала (мониторила) изменения заголовка по известному дескриптору окна (который вычислился после перетягивания мышкой эл. управления на заголовок окна).

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

Помогите, пожалуйста. Очень надо.

[Black Raider]

компонент Timer.
Храните в глобальной переменной дескриптор окна и проверяете в таймере поменялся ли тайл.

[klmmn]

Спасибо, с этим всё получилось.

Возник новый вопрос.

В окне внешней программы, дескриптор которого уже найден, есть поле для ввода текста. Как к нему получить доступ, изменить текст и нажать программно кнопку Enter?

Подскажите, пожалуйста, куда копать?

[lmikle]

EnumChildWindow поможет отцу русской демократии.

[klmmn]

Попытался вставить строку в текстовое поле с помощью функции SendMessage, но во внешней проге какой-то глюк - если скопировать текст и нажать Enter, ничего не происходит. Вводить нужно текст только с клавиатуры побуквенно и в этом случае после нажатия Enter активизируется поиск.

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

Вопрос такой - как в программе находить номер клавиши соответствующий букве?

[Black Raider]

ASC -код чтоли?

если да то chr(символ)

[klmmn]

Сообщение от Black Raider

ASC -код чтоли?

если да то chr(символ)

Нужено как-то получить номер для использования в функции Keybd_event()

Keybd_event(13, 0, 0, 0); // нажать Enter

или в функции chr()

chr(27) // escape

[klmmn]

Последний вопрос снят - Ord('буква')