Downloaden geht nicht

[Die Muhkuh]

Hi,

ich hab den Quelltext hier aus der CodeLib:

http://www.delphipraxis.net/internal_redirect.php?t=75


Das Problem ist bei mir Downloaded er nicht.

Es kommt keine Fehlermeldung etc. Aber da steht

"Der Download wurde gestartet" und dann passiert nix mehr.

[himitsu]

Zeig mal deinen Code und welche Datei du runterladen willst...

[Die Muhkuh]

OK ich hab den Fehler schon gefunden.

Und zwar:

Delphi-Quellcode:

cDownStatus := cDownloadStatusCallBack.Create;
  URLDownloadToFIle(nil,'http://www.mani007.de/Download/CBE_SETUP.exe','C:\Test.exe',0,CDownStatus);

^^ So funktionierts

so hatte ich es:

Delphi-Quellcode:

cDownStatus := cDownloadStatusCallBack.Create;
  URLDownloadToFIle(nil,'http://www.mani007.de/Download/CBE_SETUP.exe',Pchar(AppPath + '\Update\Setup.exe',0,CDownStatus);

^^ So geht nicht.

[himitsu]

Ich würde mal sagen, das bei dir 'ne Klammer fehlt

Code:

URLDownloadToFIle(nil,'http://www.mani007.de/Download/CBE_SETUP.exe',Pchar(AppPath + '\Update\Setup.exe'[color=red][b])[/b][/color],0,CDownStatus);

und wenn dann noch was gutes in AppPath steht, dann sollte es gehn.

[Die Muhkuh]

Die Klammer hatte ich auch gesetzt.

Bloß hab ich den alten Code nochmal schnell geschrieben.

Achso so geht auch noch:

Delphi-Quellcode:

var
  cDownStatus : cDownloadStatusCallback;
  Pfad : String;
begin
  Pfad := AppPath + '\Update\Setup.exe';
  cDownStatus := cDownloadStatusCallBack.Create;
  URLDownloadToFile(nil,'http://www.mani007.de/Download/CBE_SETUP.exe',PChar(Pfad),0,CDownStatus);

Ich weiß warum er auch nicht runtergeladen hat, den Ordner Update hat es nicht gegeben, dann hat er halt nichts runtergeladen.


AppPath ist eigentlich bloß ExtractFilePath(Application.Exename) mehr auch nicht



[edit] 900 Beiträge! [/edit]

[MathiasSimmack]

try und finally nicht vergessen: klick. Nur zur Sicherheit.

Und auf jeden Fall fehlt das Freigeben des Objektes. Du solltest schon alles lesen und nicht nur den erst besten Quellcode kopieren, denn auch DeCodeGuru hat´s gemerkt:

Zitat:

ich habe bei meinem Codebeispiel vergessen cDownStatus freizugeben

[Die Muhkuh]

Danke!

[MathiasSimmack]

Kein Problem. ... Ich will ja auch mal klugsch***

[Die Muhkuh]

Zitat von MathiasSimmack:

Kein Problem. ... Ich will ja auch mal klugsch***

Aber mir bitte nicht auf den Kopf . Wenn doch ich sch*** zurück.


So jetzt aber BTT!