Die Message der
Exception ist "Stream-Schreibfehler".
Delphi-Quellcode:
OutStream.CopyFrom(self, FromOffset); // Den Anfang kopieren
self.Seek(Count, soFromCurrent); // Count Bytes überspringen
Du meinst diese Stelle? Also, das müsste so passen.. Jetzt gerade Debuggt: Der Stream (Self) hat Size=26136, FromOffset=24576, Count ist 79.. und weil die Position ja vorher auf 0 gesetzt wird, passt das. Das habe ich schon vorhin bei jedem Versuch überprüft, gab keine Probleme mit den Größen.
Nachtrag: Ich hatte es vorhin auch mit Size:=0; Position:=0; probiert. Das Clear habe ich später erst gefunden.
Werde jetzt eine Runde was spielen, und dann weitersehen.. Danke erstmal für die Antwort!