Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Новый участник


Сообщения: 25
Благодарности: 1

Профиль | Отправить PM | Цитировать


Знаете что странно ? о_О
Код: Выделить весь код
Func _WinGetByPid($iPID)
    Local $aWList = WinList()
    Local $aRet[1] = [0]
	
    For $iCC = 0 To $aWList[0][0]
        If WinGetProcess($aWList[$iCC][1]) = $iPID AND _
                BitAND(WinGetState($aWList[$iCC][1]), 2) Then
            ReDim $aRet[UBound($aRet)+1]
            $aRet[0] += 1
            $aRet[$aRet[0]] = $aWList[$iCC][0]
        EndIf
    Next
    If $aRet[0] = 0 Then
        Return SetError(1, 0, 0)
    Else
        Return $aRet
    EndIf
EndFunc

$k = ProcessExists("FD.exe")
$h = _WinGetByPid($k)
Sleep(2000)
$titleP = WinGetTitle($h,"")
ConsoleWrite($titleP)
Подобная фигня возвращает имя активного окна а не открытого окна этого процесса

Отправлено: 16:21, 17-07-2009 | #5