Цитата(Snowy @ 28.11.2005, 22:57)

А хэндл чего тебе нужен?

вобще-то необходимо хэндлы всех окон приложения... как их теперь добыть? что-нибудь вроде GetWindowThreadProcessID наоборот...

http://forum.vingrad.ru/index.php?showtopic=51149

Так что перебором всех быстрее получается? Странно, мне казалось что нет...

зы: или я чегот не понял но для моего случая есть индинтификатор процесса

hProcess: THandle;

или

PID

но не хэндл родительского окна... типа его искать и надо... той токо так подходит:
Step

Цитата(Step @ 5.5.2005, 15:34)

EnumWindows получаешь хендлы на их основе берешь родителя и по родителю определяешь твое или нет

?

а если EnumThreadWindows, а затем EnumChildWindows?
_hunter, ты это тестил?
EnumThreadWindows сам по себе медленный или вместе с двумя предидущими(CreateToolhelp32Snapshot(TH32CS_SNAPTHREAD, 0) и Thread32First())?

я ж все написал...
медленнее сам метод ( + как ты собираешся использовать EnumThreadWindows без снимка? )

Сел разбиратся...
_hunter, извини что достаю, не мог бы ты привести пример использования ф-и EnumThreadWindows? С синтаксисом а-ля делфя а то я не вьезжаю в последний мессаж

или я что-то пропустил?

Цитата(_hunter @ 29.11.2005, 18:30)

( + как ты собираешся использовать EnumThreadWindows без снимка? )

(я нашел токо Handling Logoff Events от MSDN, но не всё понял как будет BOOL CALLBACK EnumProc()? {Ключевое слово CALLBACK }

Код

Function EnumProc(hwnd:HWND;lParam:LPARAM):Boolean;  Begin   Form1.ListBox1.Items.Add(IntToStr(hwnd));   Result:= TRUE; End; Function testFunction(PID:Integer):Boolean; Begin     EnumThreadWindows(PID, [i]EnumProc[/i], 0); End;

)

Код

procedure TForm1.XXX; var   h,h1:THandle; procedure RegisterWindow(hWnd:THandle); var   h:THandle;  begin  //На входе: hWnd - текущий дескриптор какого нить окна   h:=GetWindow(hWnd,gw_Child); // получение поддчинённых элементов   if h<>0 then RegisterWindow(h);   h:=GetWindow(hWnd,gw_hWndNext); // получение элеметов того же уровня   if h<>0 then RegisterWindow(h); end; begin   h1:=Handle;    repeat     h:=GetWindow(h1,GW_OWNER);      if h<>0 then h1:=h; // если не окно верхнего уровня, то ищем дальше   until h=0;   h:=GetWindow(h1,GW_HWNDFIRST);    RegisterWindow(h); // запуск рекурсии end;

PS: А вообще... если воспользуешся поиском... то увидеш... что енто не однократно обсуждалось!

Цитата(Girder @ 7.12.2005, 16:58)

//На входе: hWnd - текущий дескриптор какого нить окна

Что бы это было?

з.ы.: хороший пример использования ф-и EnumThreadWindows

Типа Эврика! CALLBACK -> stdcall;

Код

function EnumProc (Wd: HWnd; Param: LongInt): Boolean; stdcall; Begin     TForm1.ListBox1.Items.Add(IntToStr(Wd));     EnumProc := TRUE; end; Procedure GetAllWindow; Begin     TForm1.ListBox1.Items.Clear;              EnumWindows (@EnumProc, 0);  End; Procedure test(PID:Integer); Begin     TForm1.ListBox1.Items.Clear;              EnumThreadWindows(PID, @EnumProc, 0); End;

з.ы.:

Цитата(_hunter @ 29.11.2005, 18:30)

+ как ты собираешся использовать EnumThreadWindows без снимка?

Всё равно не вьехал... какого снимка? не вижу снимка

Это сообщение отредактировал(а) Bog d`An - 8.12.2005, 07:23

Цитата(Bog @ 8.12.2005, 07:02)

з.ы.: хороший пример использования ф-и EnumThreadWindows

Просто ты поступаеш так: Зачем просто когда можно сложно

Цитата(Bog @ 8.12.2005, 07:02)

Что бы это было?

То что на hWnd можеш натравить что нить... например GetWindowThreadProcessId

Цитата(Girder @ 8.12.2005, 10:38)

Просто ты поступаеш так: Зачем просто когда можно сложно smile

не, тут было дело принципа - разобратся с конкретной функцией... и фразой про снимок...

Кстати так и не понял зачем было снимок приплетать... _hunter, ау!

и вовсе не сложно строчек кода так точно меньше
и вообще если к GetWindow ещё и GetWindowThreadProcessId приплести - то точно проще...
зы:

Цитата(Girder @ 7.12.2005, 16:58)

//На входе: hWnd - текущий дескриптор какого нить окна

На входе - дескриптор окна с которого начать поиск - ты наверное это имел в виду (судя по коду)

Список процессов через снимок

Код

function IsRunning( sName : string ) : boolean;   var     han : THandle;     ProcStruct : PROCESSENTRY32; // from "tlhelp32" in uses clause     sID : string;   begin     Result := false;     // Get a snapshot of the system     han := CreateToolhelp32Snapshot( TH32CS_SNAPALL, 0 );     if han = 0 then       exit;     // Loop thru the processes until we find it or hit the end     ProcStruct.dwSize := sizeof( PROCESSENTRY32 );     if Process32First( han, ProcStruct ) then       begin         repeat           sID := ExtractFileName( ProcStruct.szExeFile );           // Check only against the portion of the name supplied, ignoring case           if uppercase( copy( sId, 1, length( sName ) ) ) = uppercase( sName ) then             begin               // Report we found it               Result := true;               Break;             end;         until not Process32Next( han, ProcStruct );       end;     // clean-up     CloseHandle( han );   end;

Цитата(Bog @ 16.12.2005, 03:15)

Кстати так и не понял зачем было снимок приплетать... _hunter, ау!

а я так и не понял что ты не понял...
ты спросил какой из методов бысрее ( один из них делает снимок ). я ответил...

Цитата(_hunter @ 16.12.2005, 12:08)

ты спросил какой из методов бысрее ( один из них делает снимок ). я ответил...

зы: ок, токо там непонятки с ответом...
итак я хотел спросить вот что: я запускаю чужое приложение с помощью Create Process, таким образом имею его ProcessInfo
1 способ: беру ProcessInfo.dwThreadId и подставляю в EnumThreadWindows первым параметром;
2 способ: перебрать все окна (опять таки есть разные решения, я так понял из предидущих постов

Цитата(Step @ 5.5.2005, 15:34)

EnumWindows получаешь хендлы на их основе берешь родителя и по родителю определяешь твое или нет

тестировалось то которое EnumWindows?) и сравниваю ейных родителей с всё тем же ProcessInfo.dwThreadId с помощью GetWindowThreadProcessId.
Все верно? или я не туда мыслю, ведь здесь нет снимков ?
вот и я сомневался что второй способ быстрее первого...

Это сообщение отредактировал(а) Bog d`An - 19.12.2005, 04:17

ты забыл о том, что приложение может иметь несколько потоков, а ты ищеш окна только одного потока. для того, чтобы найти все ротоки процесса и нужен снимок