Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];




Вниз

Как найти чужое окно.Смотрел FAQ , но ни чего не понял :-( 


vector^   (2001-12-22 12:37) [0]

А вообще, мне нужно нажать на кнопку в чужом окне программным способом (т.е. из моей программы послать сообщение что ли). Подскажите, если не лень, как это сделать. Уже который день пытаюсь разобраться, но ни чего не получается!Даже чужое окно(его хэндл) ни как найти не могу!!! :-(
Читал FAQ , но, видимо, ни чего не понял, т.к. ни чего не заработало :-(((



tovSuhov   (2001-12-22 14:09) [1]

Код где?
Давай свой код, будем смотреть, что не так...



vector^   (2001-12-22 15:33) [2]

Увы, я его дома забыл :-)). А сейчас точно не вспомню :-((
Видимо, придется спросить в следующий раз у кого-нибудь.



YUS   (2001-12-23 02:35) [3]

Хендл чужого окна можно найти так:
var
h:THandle:
begin
h:= FindWindow(nil,"Название окна");
end;



evgeg   (2001-12-23 12:40) [4]

На www.delphikingdom.com есть статья на эту тему.



Dimaond Cat   (2001-12-23 19:51) [5]

примерно так можно нажать кнопку "пуск". хотя наверно wm_lbuttondown не совсем корректно, но тем не менее работает
var
c:array[0..255] of char;
child:hwnd;
begin
Child := GetWindow(FindWindow("Shell_TrayWnd", NIL),GW_CHILD);
GetClassName(Child, C, SizeOf(C));
while (C<>"Button") and (child<>0) do begin
Child := GetWindow(Child, GW_HWNDNEXT);
GetClassName(Child, C, SizeOf(C));
end;
SendMessage(Child,WM_LBUTTONDOWN,0,0) ;
end;




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.02 c
14-66682          MJH                   2001-12-20 17:37  2002.02.21  
FAR vs WC


1-66589           IgoX                  2002-02-05 20:37  2002.02.21  
Почему так происходит


3-66497           Rash                  2002-01-28 12:15  2002.02.21  
Удаление строки в stringgrid, разные кодировки и временные файлы запросов.


3-66500           SZap                  2002-01-29 00:00  2002.02.21  
New Apollo VCL


3-66502           Ivanov_Sergey         2002-01-30 01:14  2002.02.21  
не удалить таблицу.