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

Управлять активным Editom не на своей форме!   Найти похожие ветки 

← →
SamProf ©   (2005-09-04 00:04) [0]

На не моей форме есть Edit. Он активный. как набрать на нем какойто текст и нажать Enter?

---

← →
ssk ©   (2005-09-04 12:18) [1]

не поверишь, клавиатурой!

---

← →
GanibalLector ©   (2005-09-04 12:37) [2]


 var Edit:HWND;
begin
 // находим хендл Edita ф-цией FindWindowEx а потом
SendMessage(Edit,WM_SetText,0,Lparam(PChar("GanibalLector")));
SendMessage(Edit,WM_KeyDown,VK_Return,0);
SendMessage(Edit,WM_KeyUp,VK_Return,0);
end;


---

← →
SamProf ©   (2005-09-04 13:32) [3]

А как его найти этой FindwindowEx? этот эдит активный! к примеру я хочю запустить свою прогу с таймером, через какоето время моя прога берёт сей активный элемент и шлёт на него какие нибудь месаги!

---

← →
GanibalLector ©   (2005-09-04 14:23) [4]

Для этих целей я использую InqSoft Window Scanner.Изучаю окна и их расположение,а потом творю ;)Предположим,на форме панель,а на панели этот Edit. Тогда так :

Hw1:=FindWindow(PChar("TForm1"),PChar("LAMers"));
Hw2:=FindWindowEx(Hw1,0,PChar("TPanel"),nil);
Edit:=FindWindowEx(Hw2,0,PChar("TEdit"),nil);
if Edit>0 then
begin
 ///...
end;


---

← →
SamProf ©   (2005-09-04 15:12) [5]

А как послать месагу, чтобы вызвалось KeyPress, а не KeyDown и KeyUp?

---

← →
begin...end ©   (2005-09-04 15:24) [6]

> SamProf ©   (04.09.05 15:12) [5]

WM_CHAR

---

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

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



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