_WinGetTitleEx - Extended WinGetTitle

Func _WinGetTitleEx($sWindowTitle, $sWindowText = Default)
Local $aList = WinList(), $aReturn[0]

For $i = 1 To UBound($aList) - 1
If $sWindowText = Default and StringInStr($aList[$i][0], $sWindowTitle) Then
ReDim $aReturn[UBound($aReturn) + 1]
$aReturn[UBound($aReturn) - 1] = $aList[$i][0]
ElseIf StringInStr($aList[$i][0], $sWindowTitle = "" ? $aList[$i][0] : $sWindowTitle) and StringInStr(WinGetText($aList[$i][1]), $sWindowText) Then
ReDim $aReturn[UBound($aReturn) + 1]
$aReturn[UBound($aReturn) - 1] = $aList[$i][0]
EndIf
Next

Return $aReturn
EndFunc