Moin zusammen, ich habe ein Problem beim Laden der Log-Datei.
Die Log-Datei hat 1598 Zeilen, aber der Code lädt diese nicht Vollständig...
Code:
kann mir jemand sagen warum?
Die Log-Datei hat 1598 Zeilen, aber der Code lädt diese nicht Vollständig...
Code:
VB.NET-Quellcode
- FlowLayoutPanel5.Controls.Clear()
- ErrorLog = 0
- TotalLog = 0
- OKLog = 0
- WarnLog = 0
- Dim count1 = System.IO.File.ReadLines(My.Settings.LogPath).Count()
- For i As Integer = 1 To count1
- Dim inhalt() As String = System.IO.File.ReadAllLines(My.Settings.LogPath)
- PanelBLOG = New Panel
- FlowLayoutPanel5.Controls.Add(PanelBLOG)
- With PanelBLOG
- .Name = i & "_LogPanel"
- .Dock = DockStyle.Top
- .BackColor = Color.FromArgb(50, 50, 50)
- .Height = 35
- .Width = 1220
- ' .Padding = New Padding(1)
- .SendToBack()
- End With
- PBULOG = New PictureBox
- PanelBLOG.Controls.Add(PBULOG)
- With PBULOG
- .Name = i & "_LogPictureBox"
- .Dock = DockStyle.Left
- .BackColor = Color.FromArgb(40, 40, 40)
- .SizeMode = PictureBoxSizeMode.CenterImage
- If inhalt(i).Contains("Error:") Then
- .Image = My.Resources.erroricon
- ErrorLog = ErrorLog + 1
- ElseIf inhalt(i).Contains("Warning:") Then
- .Image = My.Resources.warningICON
- WarnLog = WarnLog + 1
- Else
- .Image = My.Resources.infoIcon
- OKLog = OKLog + 1
- End If
- ' .SizeMode = PictureBoxSizeMode.CenterImage
- .SendToBack()
- .Width = 37
- End With
- ' AddHandler PBULOG.Click, AddressOf Me.PBUClick
- LBLoG = New Label
- PanelBLOG.Controls.Add(LBLoG)
- With LBLoG
- .Name = i & "_LogLabel"
- .Dock = DockStyle.Left
- .BackColor = Color.FromArgb(40, 40, 40)
- .Width = 1200
- ' .AutoSize = True
- .Height = 30
- .AutoEllipsis = True
- .Text = inhalt(i)
- .TextAlign = ContentAlignment.MiddleLeft
- ' .Font = New Font("Segoe UI", 12, FontStyle.Bold Or FontStyle.Bold)
- ' .Font = New Font("Segoe UI", "12", "style=Bold")
- .BringToFront()
- End With
- TotalLog = TotalLog + 1
- Next
kann mir jemand sagen warum?