Text aus Textdatei auslesen?

[citybreaker]

Hallo,

wie kann ich einen Text aus einer Textdatei auslesen? Genauer jeder zeile als neue Zeile
in einer Listbox ausgeben. Hab mir schon die Winshoe komponentensammlung runtergeladen,
da es ja Indy für Delphi 3 nicht gibt.

[rayman]

Wenn ich dich richtig verstehe:

Delphi-Quellcode:

ListBox1.Items.LoadFromFile('datei.txt');

Was hat das mit Indy zu tun? (wenn ich fragen darf)

[citybreaker]

Naja die Textdatei ist online.

[rayman]

Dann hab ich nix gesagt... :oops:

[Lefko]

Hm, wie wär s erst mit Runterladen und dann wie oben genannt in die Listbox laden?

simpelster weg : URLDownloadtoFile aus der URLMon.pas!

MfG Lefko.

[sCrAPt]

hiho

Delphi-Quellcode:

Listbox1.Items.Text := IdHttp1.Get('http://www.bla.de/text.txt');

IdHttp ist eine Indy-Komponente.

:angle:, sCrAPt

[citybreaker]

Ok, danke schon mal, alerdings will ich nicht das der Inhalt verändert wird.
Bringt da verschlüßeln etwas?

--- Edit --

@sracpt hab keine Indys wie gesagt Delphi3. -.-

[sCrAPt]

Ups... Hab nicht gelesen (ich hasse lesen *gg*) dass du kein Indy hast... Sorry :angle:

[citybreaker]

Ok mach es jetzt mit UrlDownloadToFile. Alerdings klappt da was nicht.

Delphi-Quellcode:

URLDownloadToFile(nil, 'http://www.delphipraxis.net, ExtractFilePath(Application.Exename) + test.html), 0, nil);

Der sagt mit immer "Inkompatible typen: 'string' und 'pchar'.

[Lefko]

Delphi-Quellcode:

URLDownloadToFile(nil, PChar('http://www.delphipraxis.net'),PChar( ExtractFilePath(Application.Exename) + test.html)), 0, nil);

das sollte gehen! ( PChar( ) eingefügt!)

MfG Lefko