Показать сообщение отдельно
  #4  
Старый 01.03.2014, 12:45
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Enforcer
Однако простое повторение отсылки этих сообщений не дает результата. Равно как и предложенный вами код. У меня получается вставлять текст вот такой процедурой:
А если попробовать отослать сообщения через SendMessage вместо PostMessage?:
Код:
  SendMessage(hwnd, WM_KEYDOWN, VK_CONTROL, $001D0001);
  SendMessage(hwnd, WM_KEYDOWN, Byte('V'),  $002F0001);
  SendMessage(hwnd, WM_CHAR, 22,  $002F0001);
  SendMessage(hwnd, WM_KEYUP, Byte('V'),  $C02F0001);
  SendMessage(hwnd, WM_KEYUP, VK_CONTROL,  $C01D0001);
Ответить с цитированием