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

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

Управлять активным Editom не на своей форме! [D7, WinXP]

SamProf ©   (2005-09-04 00:04:00) 

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

---

begin...end   (2005-09-04 15:24:00) [1]

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

WM_CHAR

---

SamProf   (2005-09-04 15:12:00) [2]

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

---

GanibalLector   (2005-09-04 14:23:00) [3]

Для этих целей я использую 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 13:32:00) [4]

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

---

GanibalLector   (2005-09-04 12:37:00) [5]


 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;


---

ssk   (2005-09-04 12:18:00) [6]

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

---

Наверх