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

Handle чужего окна   Найти похожие ветки 

← →
Dima K   (2006-09-21 10:49) [0]

Подскажите пожалуйста, как получить handle edit поля, кот. находится в окне чужего приложения. Заранее спасибо!!!

---

← →
Весь в делах   (2006-09-21 10:52) [1]

var
WindowText: array[0..255] of char; {символьный массив для хранения текста,
                                   связянного с окном}
TheWindow: HWND; {содержит дескриптор окна}
pt: TPoint; {переменная для хранения текущих координат указателя мыши}

begin
{определяем координаты указателя мыши}
pt := Mouse.CursorPos;
//pt.Y := y;
{вычисляем дескриптор окна формы,
в область которого попадают координаты указателя мыши}
TheWindow := WindowFromPoint(pt);
{получаем текст, связянный с окном}
If (GetWindowText(TheWindow, WindowText, 255))<>0 then begin
{...и показываем этот текст}
 Edit1.Text := WindowText ;
 Edit2.Text := IntToStr(TheWindow)
end
else begin
 Edit1.Text := "Данное окно не имеет описания";
 Edit2.Text := IntToStr(TheWindow);

---

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

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



Память: 0.45 MB
Время: -0.973 c