SendMessage из приложения Delphi в элемент управления Java-приложения RICHEDIT50W

Question

Кто-нибудь знает, как отправить текст из приложения Delphi в элемент управления java-приложения RICHEDIT50W? Я пробовал это, но это не работает:

oPinWindowHandle := FindWindow(nil, 'My Caption');
oRichEditControl := FindWindowEx(oPinWindowHandle, 0, 'RICHEDIT50W', nil);
SendMessage(oRichEditControl, WM_SETTEXT, 0, LongInt(PChar(msg)));

И oRichEditControl, и oPinWindowHandle имеют действительный дескриптор.

EDIT

SendMessage работает нормально. Возвращает 1. Возможно, приложение блокирует сообщения или даже обрабатывает собственное сообщение. Есть ли способ узнать, какие сообщения принимает приложение?

Answer 1

Я только что узнал, что приложение блокирует некоторые сообщения, а затем наткнулся на эту тему:

Отправка нажатий клавиш приложения с помощью «SendMessage»

Что мне очень помогло обойти проблему.