Herausfinden ob eine Datei fertig heruntergeladen ist

[Lamy]

Hi!

Gibt es eine Möglichkeit einem Programm zu sagen dass eine Datei heruntergeladen wurde und es nun drauf zugreifen kann?

Danke schonmal,Lamy

[S - tefano]

Hi,

meinst du einem Programm oder deinem Programm?
Wenn du meinst das du in deinem Programm per Quellcode prüfen willst ob eine Datei die du geladen hast fertig ist und du jetzt mit ihr arbeiten kannst, ist das recht einfach.

Du findest die größe der Datei im Internet heraus, und vergleichst sie mit der Größe der Datei auf deinem Rechner.
Such hier in der DP mal nach FileSize oder GetFileSize, sind eine schöne Dinger dabei.
Naja und für das im Internet müsste man wissen was für Klassen oder Kompos du dafür benutzt. In den entsprechenden Dokus könnte man sowas mal nachlesen.

Bis dann,

S - tefano

[Lamy]

Hm, falsch ausgedrückt - mein Programm lädt eine Updatedatei runter die etwas größer ist.
Das Programm soll so lange warten bis die Datei fertig heruntergeladen ist und diese dann öffen.

[himitsu]

Wie lädt denn dein Programm die Datei runter?

Einige der Methoden halten das Programm ja eh an, bis die Datei da ist, oder ein Fehler auftritt.

[S - tefano]

Ansonsten wenn du bspw. die Indys benutzt, bekommst du ja bei solchen Sachen Events ausgelöst. Zum Beispiel immer wenn eine bestimmte Blockgröße fertig übertragen wurde, oder (jedenfalls bei idFTP) auch wenn die Datei fertig ist (OnAfterGet).

Bis dann,

S - tefano

[Remote1]

kommt drauf an wie du runterlädst

machst du das mit

Delphi-Quellcode:

UrlDownloadToFile(nil, PChar(quelle), PChar(zeil), 0, nil)

dann gibt die fkt auch zurück ob der download erfolgreich war,und du kannst die datei dann auch öffnen

du könntest natürlich auch immer überprüfen, ob die datei überhaut schon vorhanden ist, denn ich glaube die wird erst in ein anderes verzeichnis geladen und dann erst zum zeilverzeichnis kopiert (zumindest bei meinem ie)
tja, und wenn die da ist, dann machst du halt was du machen willst

[himitsu]

Bei mir versucht UrlDownloadToFile die Datei zu überschreiben, wenn schon eine da ist.

[Remote1]

ja dann must du halt abfragen ob die schon da ist und wenn ja irgens eine zahl oder so noch mit anfügen

Delphi-Quellcode:

if fileexists('..') 
  then dateiname:=alterdateiname+'keineahnung'
  else halt normal;

[Remote1]

aber wozu eine datei runterladen die du schon hast???

[Lamy]

Zitat:

Zitat von Remote1

kommt drauf an wie du runterlädst

machst du das mit

Delphi-Quellcode:

UrlDownloadToFile(nil, PChar(quelle), PChar(zeil), 0, nil)

dann gibt die fkt auch zurück ob der download erfolgreich war,und du kannst die datei dann auch öffnen

du könntest natürlich auch immer überprüfen, ob die datei überhaut schon vorhanden ist, denn ich glaube die wird erst in ein anderes verzeichnis geladen und dann erst zum zeilverzeichnis kopiert (zumindest bei meinem ie)
tja, und wenn die da ist, dann machst du halt was du machen willst

Genau so will ichs machen... , die Datei wird zuerst gelöscht und dann eine neue mit dem selben Dateinamen heruntergeladen.
Aber wie wird denn zurückgegen dass die fertig runtergeladen ist?

Ich will das dann so einbinden:

Delphi-Quellcode:

 IF Datei runtergeladen THEN
BEGIN
Datei öffnen
Programm schließen
END

Und während des Downloads:
LBStatus.Caption := 'Es dauert noch einen Moment, die Datei wird heruntergeladen...'