Zitat von
SirThornberry:
In deinen ursprungsbeispiel eventuell noch nach
m := TMemoryStream.create
die Anweisung
m.size := f.size
hinzufügen. Ansonsten wird die größe bei jedem schreiben über das ende neu gesetzt und das kostet übelst performance
Das hat wirklich übelst Performance gekostet!
Ich habe M.Size F.Size zugewiesen und es geht viel schneller (15 sek. ca!)
Dank dir^^
mfG
mirage228