Найти все совпадения в массиве

Local $lParam[100][9]
Func WM_PAINT($hWnd)
    Local $iArray = _ArrayFindAll($lParam, $hWnd)
    If Not @error Then
        For $n=0 to 2
            $i = $iArray[$n]
            $hGraphics = $lParam[$i][1]
            $x = $lParam[$i][2]
            $y = $lParam[$i][3]
            $hBrush1 = $lParam[$i][4]
            $hBrush2 = $lParam[$i][5]
            $hBrush3 = $lParam[$i][6]
            $hBrush4 = $lParam[$i][7]
            Graphic($hGraphics, $x, $y, $hBrush1, $hBrush2, $hBrush3, $hBrush4)
        Next
    EndIf
    Return $GUI_RUNDEFMSG
EndFunc   ;==>MY_WM_PAINT

Func WM_PAINT($hWnd)
    Local $iArray = _ArrayFindAll($lParam, $hWnd)
	If Not @error Then
		For $n=0 to UBound($iArray) - 1
			Local $i = $iArray[$n]
			$hGraphics = $lParam[$i][1]
			$x = $lParam[$i][2]
			$y = $lParam[$i][3]
			$hBrush1 = $lParam[$i][4]
			$hBrush2 = $lParam[$i][5]
			$hBrush3 = $lParam[$i][6]
			$hBrush4 = $lParam[$i][7]
			Graphic($hGraphics, $x, $y, $hBrush1, $hBrush2, $hBrush3, $hBrush4)
		Next
	EndIf
    Return $GUI_RUNDEFMSG
EndFunc   ;==>MY_WM_PAINT