Datei mit TStream kopieren

[sirius]

Zitat:

Nachdem diese durchgelaufen ist, hängt das Programm und der Netzwerkmonitor (STRG+Alt+Entf unter WinXP) zeigt noch max. Traffic an. Das geht noch einige sek. so weiterm bis die Übertragung dann tatsächlich abgeschlossen ist. sehr merkwürdig das ganze.

Das liegt daran:

Zitat:

Mit dem letzten
StreamOut.CopyFrom(StreamIn,0);
kopierst du den ganzen Stream nochmal von vorn (das bedeutet die 0).

Du darfst da nicht 0 übergeben, sondern, das was tatsächlich noch kopiert werden muss (irgendwie Stream.Size-Stream.Position)

Und der Rest dürfte problemlos klappen.