SendMessage в "чужую" программу

← →
AlTsy (2005-02-04 22:59) [0]

Есть некоторая проблема: текст уходит в Блокнот, но в другие программы (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;

← →
Piter © (2005-02-04 23:46) [1]

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

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

SendMessage в "чужую" программу Найти похожие ветки