Datei runter laden mit Dateinamen aus einer Editkomponente??

**mlspider**

Hallo,

ich hoffe ich nerve euch nicht all zu sehr!!!

Ich habe auf meinen Formular eine Edit-Komponente. Dort trage ich nun eine Text-Datei ein. Diese möchte ich nun von einem Server runterladen.

Bisher habe ich es mit folgenden Code versucht:

UrlDownloadtofile(nil,'http://www.xyz.de/'+'Edit1.Text','C:\11\Edit1.Text',0,nil); Leider funktioniert das nicht. Der Kompiler gibt aber merkwürdiger Weise auch keine Fehlermeldung aus.

Was mache ich falsch?????

Danke!

**Steve**

UrlDownloadtofile(nil,'http://www.xyz.de/'+'Edit1.Text','C:\11\Edit1.Text',0,nil); Du übergibst hier den String 'Edit1.Text' und nicht die Eigenschaft Edit1.Text
(Man beachte die Hochkommata

markieren

Delphi-Quellcode:

			{ Korrigiert: }

UrlDownloadtofile(nil,'http://www.xyz.de/'+Edit1.Text,'C:\11\'+Edit1.Text,0,nil);

edit:

Zitat:

Der Kompiler gibt aber merkwürdiger Weise auch keine Fehlermeldung aus.

Das ist nicht seltsam, sondern absolut korrekt, da Du nu einen inhaltlichen Fehler machst, keinen syntaktischen oder sonstwie für den Compiler entscheidenden! Du übergibst hier ja wie gefordert einen String. Was in dem String steht, is dem Compiler wurscht

Gruß
Stephan

**mlspider**

Hallo Steve,

Habe jetzt alles korrigiert. Nun gibt der Kompiler eine Meldung aus:

Inkompatible Typen: 'String' und 'PAnsiChar'

**Steve**

Gut, dann wird gar kein String, sondern eben PAnsiChar gefordert. Kann man aber umwandeln:

PAnsiChar(Edit1.text) Gruß
Stephan

**Brüggendiek**

Hallo!

Dann schreibe doch einfach:

UrlDownloadtofile(nil,PChar('http://www.xyz.de/'+Edit1.Text),PChar('C:\11\'+Edit1.Text),0,nil); Gruß

Dietmar Brüggendiek

**mlspider**

Nicht sauer sein. Bin noch nicht "Delphifest". Wie binde ich nun Deinen Code ein??? Als Variable???

**Nicolai1234**

Zitat von mlspider:

Nicht sauer sein. Bin noch nicht "Delphifest". Wie binde ich nun Deinen Code ein??? Als Variable???

Einfach deine falsche Zeile durch diese erstzen:
UrlDownloadtofile(nil,PChar('http://www.xyz.de/'+Edit1.Text),PChar('C:\11\'+Edit1.Text),0,nil);

**mlspider**

Ihr seit Super!!!!!!! Jetzt funktioniert es!

Danke!!!

**shmia**

Es lohnt sich, die Funktion URLDownloadToFile Delphi-like zu kapseln.

markieren

Delphi-Quellcode:

			function DownLoadInternetFile(const URL, localfile : String): Boolean;

begin

   Result := URLDownloadToFile(nil,PChar(URL),PChar(localfile),0,nil) = 0

end;

Datei runter laden mit Dateinamen aus einer Editkomponente??

Datei runter laden mit Dateinamen aus einer Editkomponente??

Re: Datei runter laden mit Dateinamen aus einer Editkomponen

Re: Datei runter laden mit Dateinamen aus einer Editkomponen

Re: Datei runter laden mit Dateinamen aus einer Editkomponen

Re: Datei runter laden mit Dateinamen aus einer Editkomponen

Re: Datei runter laden mit Dateinamen aus einer Editkomponen

Re: Datei runter laden mit Dateinamen aus einer Editkomponen

Re: Datei runter laden mit Dateinamen aus einer Editkomponen

Re: Datei runter laden mit Dateinamen aus einer Editkomponen

Forumregeln

mlspider Registriert seit: 22. Okt 2003 Ort: Berlin 661 Beiträge Delphi 7 Enterprise	#3 Re: Datei runter laden mit Dateinamen aus einer Editkomponen 7. Okt 2004, 12:08 Hallo Steve, Habe jetzt alles korrigiert. Nun gibt der Kompiler eine Meldung aus: Inkompatible Typen: 'String' und 'PAnsiChar' Mario
	Zitat

Steve Registriert seit: 2. Mär 2004 Ort: Würzburg 730 Beiträge Delphi 2006 Personal	#4 Re: Datei runter laden mit Dateinamen aus einer Editkomponen 7. Okt 2004, 12:11 Gut, dann wird gar kein String, sondern eben PAnsiChar gefordert. Kann man aber umwandeln: PAnsiChar(Edit1.text) Gruß Stephan Stephan B. Wer andern eine Grube gräbt ist Bauarbeiter! Wer im Glashaus sitzt, sollte sich lieber im Dunkeln ausziehen! Außerdem dieser Satz kein Verb...
	Zitat

mlspider Registriert seit: 22. Okt 2003 Ort: Berlin 661 Beiträge Delphi 7 Enterprise	#6 Re: Datei runter laden mit Dateinamen aus einer Editkomponen 7. Okt 2004, 12:13 Nicht sauer sein. Bin noch nicht "Delphifest". Wie binde ich nun Deinen Code ein??? Als Variable??? Mario
	Zitat

Nicolai1234 Registriert seit: 21. Feb 2004 1.008 Beiträge Turbo Delphi für Win32	#7 Re: Datei runter laden mit Dateinamen aus einer Editkomponen 7. Okt 2004, 12:16 Zitat von mlspider: Nicht sauer sein. Bin noch nicht "Delphifest". Wie binde ich nun Deinen Code ein??? Als Variable??? Einfach deine falsche Zeile durch diese erstzen: UrlDownloadtofile(nil,PChar('http://www.xyz.de/'+Edit1.Text),PChar('C:\11\'+Edit1.Text),0,nil);
	Zitat

mlspider Registriert seit: 22. Okt 2003 Ort: Berlin 661 Beiträge Delphi 7 Enterprise	#8 Re: Datei runter laden mit Dateinamen aus einer Editkomponen 7. Okt 2004, 12:20 Ihr seit Super!!!!!!! Jetzt funktioniert es! Danke!!! Mario
	Zitat

shmia Registriert seit: 2. Mär 2004 5.508 Beiträge Delphi 5 Professional	#9 Re: Datei runter laden mit Dateinamen aus einer Editkomponen 7. Okt 2004, 13:06 Es lohnt sich, die Funktion URLDownloadToFile Delphi-like zu kapseln. markieren Delphi-Quellcode: function DownLoadInternetFile(const URL, localfile : String): Boolean; begin Result := URLDownloadToFile(nil,PChar(URL),PChar(localfile),0,nil) = 0 end; Andreas
	Zitat