Textdatei auf nem Server öffnen

[Simon6785]

Hallo, ich habe auf einem Server im inet eine TExtdatei liegen, in der nur eine Versionsnummer steht, z.b. 0.5

diese nummer möchte ich mit der lokalen version vergleichen und eine meldung ausgeben wenn eine aktuellere version vorliegt. naja, wie kann ich eine Textdatei so öffnen, mit assign wohl nicht, ne? dann muss ich irgendwie einen timeout einbringen, also wenn der server nicht erreichbr ist oder der user garnicht im inet ist soll schnell weitergemacht werden ohne fehlermeldung, der user solldavon nichts mitkriegen. habti hr eine idee??

[Luckie]

Es wird dir nichts anderes übrigbleiben, als die Datei runterzuladen und dann lokal auszulesen.

[chaosben]

Ich habe gerade das erst kürzlich realisiert. Da gibts von den Jedis den "JvHttpUrlGrabber". Damit lässt sich das Ganze mit wenig Aufwand ermöglichen.

[Simon6785]

hm, da find ich überhaupt nichts zu diesem JvHttpUrlGrabber, selbst google liefert nichts... gibts da so keine function zu?!? gethttp?

[chaosben]

Hast du die Jedi-Controls installiert?

[Simon6785]

find ich bei google auch nichts zu, kannst du mir einen downloadlink geben? was ist denn das, eine klasse? Und wie wende ich die function dann im detail an??

Gruß Simon

[Binärbaum]

Die ofizielle Seite der "Jedis" ist http://www.delphi-jedi.org/
Dort müsste es auch Downloadlinks geben.

MfG
Binärbaum

[supermuckl]

hol dir nen billigen webspace wo du die txt hochlädst

dann tuste in deinem proggi einfach mit ner komponente deiner wahl die datei downloaden und überprüfen ob version > aktuelle.

wenn verbindung fehlschlägt, einfach unterdrücken bzw im about eventuell nen vermerk platzieren, der darauf aufmerksam macht, das nicht auf aktuellste version geprüft werden kann

[Simon6785]

also diese jedicomponente würde ich jetzt ungern verwenden, hat delphi keine standartkomponente um eine datei ins tempverzeichniss zu laden?

[shmia]

Ein Datei kann so relativ einfach von einem Webserver downgeloaded werden:

Delphi-Quellcode:

uses UrlMon;
function DownLoadInternetFile(const Source, Dest : String): Boolean;
begin
   Result := URLDownloadToFile(nil,PChar(Source),PChar(Dest),0,nil) = 0
end;
if DownLoadInternetFile('http://www.delphipraxis.net/topic68366.html', 'C:\dp.html') then
   ShowMessage('Daten sind da!');

Vorraussetzung: IE muss installiert sein.
Vorteil: einfach, Einstellungen des IE (z.B. Proxy) werden verwendet
Nachteil: keine Diagnosemöglichkeit, keine Einflussnahme auf HTTP-Header