Einzelnen Beitrag anzeigen

Benutzerbild von ManuMF
ManuMF

Registriert seit: 11. Jul 2005
1.016 Beiträge
 
Delphi 6 Personal
 
#4

Re: Problem bei versenden größerer Dateien mit Indy 10

  Alt 31. Aug 2005, 11:08
Timer? Dann ist es klar...

Probier doch folgendes:
Delphi-Quellcode:
// Von DSDT.info

procedure Pause(MilliSek: LongWord);
  var Start : Cardinal;
begin
  Start := GetTickCount;
  repeat
    Application.ProcessMessages
  until
    (GetTickCount - Start > MilliSek);
end;
also im Timer so:
Delphi-Quellcode:
DateiSenden;
Pause(25000); // für 25 Sekunden
Das Timer-Interval kann dann z.B. 1 Sekunde sein, da (zumindest bei mir) durch die Pause das ganze Programm angehalten wird.
  Mit Zitat antworten Zitat