Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

SendMessage в "чужую" программу [D7, WinXP]


AlTsy ©   (2005-02-04 22:59:00) 

Есть некоторая проблема: текст уходит в Блокнот, но в другие программы (Excel, Word) нет. Где ошибка?

Wnd:= GetForegroundWindow();
if AttachThreadInput(GetWindowThreadProcessID(Wnd),GetCurrentThreadID,True)
 then begin
      t:= self.Data;
      wnd:= Windows.GetFocus;
       for i:= 1 to Length(t) do
        begin
        key:= ord(t[i]);
        SendMessage(Wnd, WM_CHAR,key, 25);
       end;{for i}
      end;


Сергей К.   (2005-02-06 18:24:00) [1]

В word и excel с помощью sendmessage не вставиш, предлагаю работать через буфер обмена - записать в него текст а потом импулировать нажатие комбинации shift+ins в word,excel с помощью kb_event. Проверено - работает.


Piter   (2005-02-04 23:46:00) [2]

Что показывают результаты отладки?


Наверх

Титульная страница Поиск, карта сайта Написать письмо