Hallo,
mir hat das Problem keine Ruhe gelassen. Jetzt habe ich Zeitmessungen in fast jeder Zeile des Quelltextes durchgeführt. Und es ergab sich, dass das Problem nicht an TFileStream liegt (lag im 100stel Sekunden-Bereich) sondern an TStream.WriteString. Dies klaut mir die Zeit...
Delphi-Quellcode:
try
block.CopyFrom(FFileHandle, BlockHeader.TextLength);
MyStream.WriteString(block.DataString);
finally
block.Free;
end;
Sieht irgendjemand eine andere Möglichkeit, wie ich die Daten schnell in den StringStream bekomme?