iX).ToString = "200" Or PixelArray(iZ, iX).ToString = "204" Then
                                                    If PixelArray(iZ, iX + _
                                                      1).ToString <> "200" _
                                                      And PixelArray(iZ, iX + _
                                                      1).ToString <> "204" Or _
                                                        PixelArray(iZ, iX - _
                                                        1).ToString <> "200" _
                                                        And PixelArray(iZ, iX - _
                                                        1).ToString <> "204" Then
                                                        matchVor(2, iX) = True
                                                    End If
                                                Else
                                                    MatchLeer(2, iX) = True
                                                End If
                                            Else
                                                If PixelArray(iZ, iX).ToString _
                                                  = "200" Or PixelArray(iZ, _
                                                  iX).ToString = "204" Then
                                                    If PixelArray(iZ, iX + _
                                                    1).ToString <> "200" And _
                                                    PixelArray(iZ, iX + _
                                                    1).ToString <> "204" Then
                                                        matchVor(2, iX) = True
                                                    End If
                                                Else
                                                    MatchLeer(2, iX) = True
                                                End If
                                            End If
                                        Next iZ
                                    End If
                                    If PixelArray(iY, iX).ToString = "200" Or _
                                      PixelArray(iY, iX).ToString = "204" Then
                                        If MatchLeer(2, iX) = False And _
                                        matchVor(2, iX) = True Then
                                            ErkMatrix(2, iY - 16, iX - 2) = 2
                                        Else
                                            ErkMatrix(2, iY - 16, iX - 2) = 0
                                        End If
                                    Else
                                        ErkMatrix(2, iY - 16, iX - 2) = 1
                                    End If
                            End Select
 
                        Case 29 To 41 'Zeile3
                            Select Case iX
                                Case 2 To 288
                                    If iY = 29 Then 'Nach Trennung suchen Leere 
                                    ' Zeile + Buchstabe daneben