Einzelnen Beitrag anzeigen

hsbc

Registriert seit: 28. Jan 2004
Ort: Krems/Donau
404 Beiträge
 
Delphi 7 Professional
 
#15

Re: FTP-Übertragung "sanft" beenden

  Alt 28. Jan 2007, 09:23
Hallo allerseits,

Versuche mal folgendes: (klappt bei mir hervorragend)

Delphi-Quellcode:
1.) Im Ereignis OnWork von idFTP:
      Application.ProcessMessages einfügen

2.) In Deinem Abbruch-Button-Ereignis:
      try
        IdFTP1.Abort;
        Abbruch := true;
      except
        Abbruch := false;
      end;

3.) In Deiner Upload-Routine:
      for i := 0 to ListBox1.Items.Count - 1 do
      begin
        if NOT Abbruch then
        begin
          ... Hier deine IdFTP1.Put -
        end;
      end;
mfg
Herbert
  Mit Zitat antworten Zitat