Ich habe "nur" VS2010 Express und bei mir läuft der Code von Artentus. Wenn man die Sub GetHexString noch etwas aufpeppt läuft es auch mit einer Textbox ausreichend schnell.RodFromGermany schrieb:
@Artentus: Für diesen Code brauchst Du das 2012er Studio.
Mit zu großen Dateien sollte man aber in dieser Fassung nicht spielen, das reicht der Puffer nicht nicht.
VB.NET-Quellcode
- Do Until fs.Position = fs.Length
- Dim bytes() = br.ReadBytes(Math.Min(bufferSize, Convert.ToInt32(fs.Length - fs.Position)))
- Dim j As Integer = 0
- For i = 0 To bytes.Length - 1
- If j = 7 Then
- hexString.Append(" ")
- ElseIf j = 15 Then
- hexString.Append(Environment.NewLine)
- j = 0
- End If
- hexString.Append(bytes(i).ToString("X2") & " ")
- j += 1
- Next
- RaiseEvent ProgressChanged(Me, New HexReaderProgressChangedEventArgs(Convert.ToInt32(fs.Position / fs.Length * 100)))
- Loop