Скачать: CL | DM;

Дескриптор (handle) элемента другого приложения   Найти похожие ветки 

← →
sensor   (2004-07-27 19:03) [0]

Уважаемые мастера! Подскажите такую весчь: как мне получить дескриптор TEdit"a другого приложения (оно написано тоже на дельфе).
А нужно это для посылки своего текста в другое окно.
Пример:
SendMessage(Edit1.handle, WM_SETTEXT, 0, Integer(PCHar("test")));
отправляет текст "test" в Edit1 на моей форме, а мне нужно в Edit другого приложения.
____
Заранее спасибо!

---

← →
GanibalLector ©   (2004-07-27 19:48) [1]

Находиш сначала хендл ТОГО приложения,а только потом находиш хендл edit-a.Поможет findwindow и findwindowex

---

← →
parovoZZ ©   (2004-07-27 21:39) [2]

А если едитов много, то как быть?

---

← →
sensor   (2004-07-28 01:39) [3]

2GanibalLector Найти хэндл нужного окна я могу, с использованием FindWindow(), а как мне узнать хэндл TEdit"a в этом приложении? (да и еще вдруг там их окажеца несколько).

---

← →
GanibalLector ©   (2004-07-28 01:56) [4]

Ребят..ну Вы просто гоните...Я ж и так сказал какими ф-циями.Опять не так???Ну на смотри:

procedure TForm1.Button1Click(Sender: TObject);
var Ha,Ha1:THandle;
begin
Ha:=findwindow(nil,"FUCK");
Ha1:=findwindowex(Ha,0,"TEdit",nil);
SendMessage(Ha1, WM_SETTEXT, 0, Integer(PCHar("test")));
Caption:=inttostr(ha1);
end;

---

← →
sensor   (2004-07-28 02:08) [5]

2GanibalLector
Сорь, я прост в ВинСДК прочел что findwindowex не пашет в НТ"е =)
НО, оно всеравно не пашет. в пределах моего приложения пашет, а в другом не пашет, хотя я уверен что Edit там один

---

← →
GanibalLector ©   (2004-07-28 02:14) [6]

Уважаемый,коль Вы занимаетесь такими вещами,то заимейте сканер окон.Пройдитесь им по Edit-у ...может это вовсе не Edit??? Найдите родителя этого edita.И опять таки findwindowex родителя.

---

← →
sensor   (2004-07-28 02:16) [7]

WinSight32 =))

---

← →
GanibalLector ©   (2004-07-28 02:17) [8]

ОЧЕНЬ РЕКОМЕНДУЮ InqSoft Window Scaner от CyberManiak-а.
http://kickme.to/inqsoft

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c