Re: .txt Datei vom Server beziehen
Delphi-Quellcode:
Ziel := 'C:\index.html';
|
Re: .txt Datei vom Server beziehen
Du musst halt schon ein Zieldateiname angeben :zwinker:
|
Re: .txt Datei vom Server beziehen
Hi,
1. ist Ziel ein Dateiname und 2. hab zumindest ich keine Schreibrechte auf C:\ Mfg FAlter |
Re: .txt Datei vom Server beziehen
Es klappt immer noch nicht, irgendwas mache ich falsch.
Die Downloadzeit (falls es eine gibt) ist irsinnig schnell. Hier ist mal der ganze Quelltext:
Delphi-Quellcode:
Ich habe Administrator Rechte, dann müsste ich auch alle Schreibrechte haben.
unit Unit1;
interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, XPMan, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdHTTP, UrlMon; type TForm1 = class(TForm) Label1: TLabel; XPManifest1: TXPManifest; StatusBar1: TStatusBar; Button1: TButton; Memo1: TMemo; Label2: TLabel; IdHTTP1: TIdHTTP; procedure FormCreate(Sender: TObject); procedure memo_nehmen(Sender: TObject); private { Private-Deklarationen } public { Public-Deklarationen } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin memo1.Clear; label2.Caption := ''; end; procedure TForm1.memo_nehmen(Sender: TObject); var Quelle, Ziel: String; begin label2.Caption := (Sender as TButton).Caption; Quelle := 'http://www.google.de/index.html'; Ziel := 'C:\Dokumente und Einstellungen\Computer\Eigene Dateien\Schule\Informatik\Delphi\Hausaufgaben\index.html'; UrlDownloadToFile(nil, PChar(Quelle), PChar(Ziel), 0, nil); end; end. Ich kann meinen Fehler einfach nicht finden :( :( |
Re: .txt Datei vom Server beziehen
Die Funktion funktioniert auch asynchron. Der letzte Parameter ist ein Callback. Diese wird aufgerufen, wenn sich der Status ändert. Wie ist der Returncode?
|
Re: .txt Datei vom Server beziehen
Gute Frage :gruebel:
Was genau ist ein Returncode? Ich kenne diese Funktion erst seit 10 Minuten :wink: |
Re: .txt Datei vom Server beziehen
Zitat:
|
Re: .txt Datei vom Server beziehen
Okay, da bin ich jetzt nicht so ganz durchgestiegen :pale:
Was sollte ich denn anstelle des letzen 'nil' schreiben? |
Re: .txt Datei vom Server beziehen
Was liefert den die Funktion zurück?
|
Re: .txt Datei vom Server beziehen
Bei mir ja anscheinend gar nichts.
Die Funktion sollte dazu dienen, dass eine Datei aus dem Internet aufm meinen Pc geladen wird. Wird da etwas gesendet??? Sorry, aber ich bin in diesem Punkt wirklich ein ziemlicher Anfänger. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:17 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz