hi,
ich möchte eine prozentanzeige oder/und ein eine anzeige wie lange es noch dauert
hier is mein bisheriger code ohne % anzeige usw:
server:
Delphi-Quellcode:
var
FStream:tfilestream;
...
begin
FStream := TFileStream.Create('datei_s', fmCreate);
try
AContext.connection.IOHandler.ReadStream(fstream);
finally
end;
FreeAndNil(FStream);
end
client:
Delphi-Quellcode:
var
FStream:tfilestream;
...
begin
FStream := TFileStream.Create('datei_c', fmOpenRead);
try
IdTCPClient_filemanager.IOHandler.Write(Fstream,0,true);
finally
IdTCPClient_filemanager.Disconnect;
end;
FreeAndNil(FStream);
ps: die anzeige soll beim server sein aber bei beiden wäre es natürlich besser
mfg gandime
edit:
ich hatte mir schon überlegt beim server die größe der datei auszulesen aber da bekomme ich immer die größe die die datei hat wenn sie fertig geladen is