Maza_Faka
Advanced Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору m1kser Можно так: Код: Run("Notepad.exe") WinWait("[CLASS:Notepad]") $hWnd = WinGetHandle("[CLASS:Notepad]") Send("Hello world!") MsgBox(0, "Warning", "Now we get a handle of the Edit control") $hWndChild = _FindWindowEx($hWnd, "Edit") MsgBox(0, "Result", "hwnd: " & $hWndChild & @LF & _ "Text: " & ControlGetText($hWnd, "", $hWndChild)) Func _FindWindowEx($hWnd, $sClassName = "") Local $tBUFFER = 0 If $sClassName Then $tBUFFER = DllStructCreate("char[256]") DllStructSetData($tBUFFER, 1, $sClassName) EndIf Local $aRet = DllCall("User32.dll", "hwnd", "FindWindowEx", _ "hwnd", $hWnd, _ "hwnd", 0, _ "ptr", DllStructGetPtr($tBUFFER), _ "ptr", 0) Return $aRet[0] EndFunc ;==>_FindWindowEx | Edit: Немного изменил код, если функция вызывается без второго параметра, то возвращается дескриптор дочернего окна, находящегося в самом верху Z-последовательности. Добавлено: dallas roma Можно пинговать какой нибудь сервер, что бы определить состояние подключения. | Всего записей: 1420 | Зарегистр. 25-10-2006 | Отправлено: 08:22 20-01-2009 | Исправлено: Maza_Faka, 08:37 20-01-2009 |
|