Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.06;
Скачать: 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 вся ветка

Текущий архив: 2005.11.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.058 c
4-1125891164
LEXX_55
2005-09-05 07:32
2005.11.06
Как изменить кодировку в TXT


2-1129281738
ABS
2005-10-14 13:22
2005.11.06
TAdoConnection


14-1129572358
Bogdan1024
2005-10-17 22:05
2005.11.06
Transact-SQL за 2 дня


14-1129632373
vecna
2005-10-18 14:46
2005.11.06
Подскажите программку...


4-1125837051
lexales
2005-09-04 16:30
2005.11.06
Перехват событий Explorer