Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Downloaden geht nicht (https://www.delphipraxis.net/20466-downloaden-geht-nicht.html)

Die Muhkuh 18. Apr 2004 14:43


Downloaden geht nicht
 
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 18. Apr 2004 14:47

Re: Downloaden geht nicht
 
Zeig mal deinen Code und welche Datei du runterladen willst...

Die Muhkuh 18. Apr 2004 14:54

Re: Downloaden geht nicht
 
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 18. Apr 2004 15:30

Re: Downloaden geht nicht
 
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 18. Apr 2004 15:34

Re: Downloaden geht nicht
 
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] :party: :party: :party: 900 Beiträge! :party: :party: :party: [/edit]

MathiasSimmack 18. Apr 2004 16:31

Re: Downloaden geht nicht
 
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 18. Apr 2004 16:42

Re: Downloaden geht nicht
 
:shock:

Danke!

MathiasSimmack 18. Apr 2004 16:49

Re: Downloaden geht nicht
 
Kein Problem. ... Ich will ja auch mal klugsch*** ;)

Die Muhkuh 18. Apr 2004 16:51

Re: Downloaden geht nicht
 
Zitat:

Zitat von MathiasSimmack
Kein Problem. ... Ich will ja auch mal klugsch*** ;)

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


So jetzt aber BTT!


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:30 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz