![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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]Что показывают результаты отладки?