Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.19;
Скачать: CL | DM;

Вниз

Поиск окна   Найти похожие ветки 

 
anubis ©   (2006-03-05 08:38) [0]

Люди мне нужно чтобы прога искала окошко "Х"
я знаю что это делается так

if FindWindow(nil, &#8242;Безымянный - Блокнот&#8242;) <> 0 then
ShowMessage(&#8242;Окно найдено&#8242;)
else
ShowMessage(&#8242;Окно НЕнайдено&#8242;);

но почемуто не работает может есть ещё какието способы ?


 
Handle   (2006-03-05 11:27) [1]

procedure TForm1.Button1Click(Sender: TObject);
var
Wnd:           hWnd;
buff:          array[0..127] of Char;
begin
Wnd := GetWindow(Handle, gw_HWndFirst);
while Wnd <> 0 do begin
if IsWindowVisible(Wnd) and
(GetWindowText(Wnd, buff, sizeof(buff)) <> 0)
then begin
GetWindowText(Wnd, buff, sizeof(buff));
if buff = "Безымянный - Блокнот" then
ShowMessage("Окно найдено");
end;
Wnd := GetWindow(Wnd, gw_hWndNext);
end;
end;


 
anubis ©   (2006-03-05 16:15) [2]

не находит может чтонибудь другое?


 
Zeqfreed ©   (2006-03-05 16:29) [3]


> почемуто не работает

Как не работает? Неужели, ни одного сообщения не появляется?


 
Handle   (2006-03-05 16:32) [4]


> anubis ©   (05.03.06 16:15) [2]
> не находит может чтонибудь другое?


Ты блокнот то запускаешь когда ищешь его ?



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

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

Наверх




Память: 0.47 MB
Время: 0.031 c
15-1140625915
Desdechado
2006-02-22 19:31
2006.03.19
Ресурсы-файлокачалки


15-1140594096
Ученик чародея
2006-02-22 10:41
2006.03.19
Трансгенные организмы.


15-1140506722
начинающий
2006-02-21 10:25
2006.03.19
Python


2-1141299151
MAXHO
2006-03-02 14:32
2006.03.19
Как с интернета скачать файл


8-1126932699
Out
2005-09-17 08:51
2006.03.19
Цвет пикселя