Тема: Help! WinAPI !!
Показать сообщение отдельно
  #3  
Старый 25.01.2008, 15:27
Аватар для XIO
XIO XIO вне форума
Новичок
 
Регистрация: 06.12.2007
Сообщения: 77
Репутация: 32
По умолчанию нажатие кнопки на форме приложения с помощью SendMessage/PostMessage

Доброго времени суток, уважаемые.

Никак не могу понять тонкость работы с SendMessage.
Есть процедура:

Код:
procedure TMyThread.ClickOnForm;
var
  TheChildHandle: HWND;
begin
  TheChildHandle := FindWindowEx(FindWindow(nil, 'Microsoft Office Outlook'), 0, nil, PChar('Да'));
  SendMessage(TheChildHandle, WM_ACTIVATE, 1, 1);
  SendMessage(TheChildHandle, WM_LBUTTONDOWN, MK_LBUTTON, 1);
  Sleep(300);
  SendMessage(TheChildHandle, WM_LBUTTONUP, MK_LBUTTON, 1);
end;

В общем и целом работает. НО! Только визуально! Видно как нажимается кномпа "Да". Только аутлук, не реаигрует на эти нажатия, пока не кликнешь по форме созданного письма или по форме с вопросом. Как решить эту проблему? В качестве параметров я уже многое пробовал подставлять, безрезультатно. Кто знает как победить проблему? Зарание благодарен.
Ответить с цитированием