Aus dem Internet in TMemo

[FreakLitkowsky]

Hallo Leute
Ich habe mal eine Frage:
Wie kann ich eine *.txt-Datei aus dem Internet (von einer URL z.B. "www.url.de/datei.txt") in TMemo laden?

Ich habe vor, eine Versionsüberprüfung eines Programms zu machen. Zusätzlich wäre es noch klasse, wenn vorher die Verbindung überprüft wird (Besteht eine Verbindung zum Internet?).


Ich hoffe ihr könnt mir antworten.
Bis bald!

[Bernhard Geyer]

Wie wäre es mit Foren-Suche für die einzelnen Fragen :warn:

1, Datei herunterladen aus Internet
2, Verbindung zum Internet überprüfen.

Ich denke du wirst von Antworten überhäuft.

[FreakLitkowsky]

Mhh danke, aber ich hab nichts gefunden woraus ich schlau geworden bin, höchtens Dieses hier aber ich verstehe nicht wie man die Datei herunterläd. Im Quellcode steht nur wie man die Datei hochlädt (oder irre ich mich :gruebel: ).
Naja hoffe auf weitere Hilfe.

[Bernhard Geyer]

URLDownloadToFile

[FreakLitkowsky]

Okay danke hab das jetzt hinbekommen^^

So jetzt hab ich einen anderen Fehler:
Das Programm überprüft Server- und Userversion (z.B. 1.2).
Und hier das Problemchen:
2 Memos laden jeweils die Server- und Userversionen als Text.
Eine Variable speichert beides (die Variablen heißen (wie unerwartet^^) Serverversion und Userversion, als Integer gespeichert).

Wenn das Programm abläuft und den jeweiligen Punkt mit der IF-anweisung:

Delphi-Quellcode:

[...]
  Serverversion := StrToInt(Form1.Memo3.Text);
  Userversion := StrToInt(Form1.Memo2.Text);
  IF Userversion < Serverversion THEN
[...]

...erscheint eine Fehlermeldung die besagt "[...] 1.2 ist kein gültiger Integerwert[...]".


Könnt ihr mir gaaanz zufällig helfen :lol: , wäre echt klasse.

[Bernhard Geyer]

Neue Frage - Neuer Thread :warn:
Sonst kennt sich keiner mehr aus.

[Blackheart]

Die Fehlermeldung sagt Dir doch schon ziehmlich genau was da nicht stimmt. (Was sind denn Integer) :wink:

[scrat1979]

Hier ein Denkanstoß (Integer dürfen - wie schon erwähnt - keine Kommas oder Punkte enthalten [GANZE Zahl!])

Installiert: 1.6.0.23
Aktuell: 1.9.3.2

Bilde ein Integer, indem Du die "Zehnerstellen" folgendermaßen multipliziert und danach vergleichst:

Installiert: 23*1 + 10*0 + 6*100 + 1*1000 = 1623
Aktuell: 2*1 + 3*10 + 9*100 + 1*1000 = 1932

--> Aktuell > Installiert --> Update vorhanden. Warum nicht die Zahlen direkt (ohne Multiplikation) vergleichen? DARUM:

Installiert: 1.6.0.23 --> 16023
Aktuell: 2.0.0.5 --> 2005

Hier stimmt es nicht! Multipliziert Du wie oben, dann kannst Du dieses Problem umgehen:

Installiert: 1623 (s.o.)
Aktuell: 5*1+0*10+0*100+2*1000 = 2005

--> Funktioniert :-)

Ich hoffe dir mit diesem Tip etwas weitergeholfen zu haben...

SCRaT

P.S.: Delphi-Hilfe: Stichwörter "StrToInt", "Copy", "Delete", "POS" sollten reichen... Viel Glück :thumb:

[FreakLitkowsky]

Okay danke.

@Bernhard Geyer: Ich weiß du willst nur das beste fürs Forum, aber wieso beantwortest du nicht einfach meine Frage :cry: :?:

[Edit]
@Blackheart: Integer sind ganze Zahlen^^ (z.B. 10, 11, 4, 6 (ich könnte jetzt alle aufzählen, aber das lass ich lieber :P ))
[/Edit]