Text aus Datei in eine ListBox laden

[Äfan]

Meine Textdatei sieht so aus:

File1
File2
File3

Ich will das der Text in eine Listbox geladen wird. Die Liste soll auch so wie die Textdatei aussehen. Wenn ich es aber normal mit: ListBox1.Items.Add mache, werden alle 3 Zeilen in eine Zeile in der ListBox eingefügt. Wie mache ich es, damit die 3 Zeilen aus der Textdatei auch in 3 Zeilen der Listbox eingefügt werden ?

[nailor]

mehr code mehr code. dann können wir dir besser helfen, und müssen nicht alles alleine coden . das einlesen ist das entscheidende. musst jede zeile einzeln adden.

[Äfan]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
   Cache := IdHTTP1.Get('http://aefan.x-craft.de/ServerTest.txt');
  
 ListBox1.Items.Add(Cache);
   
   If Cache > '' then
    Label4.Caption := 'Datei geladen'
   else
    Label4.Caption := 'Ein Fehler ist aufgetreten'
end;

PS: Der Text der in Label4 komm, kann man den auch in eine Statusbar machen ?

[nailor]

ich hab von dem netzwerkkram keine ahnung, jedenfalls scheint das als ein string reinzukommen. und der wird dann geadded --> eine zeile. du musst ihn zerlegen, und jede zeile einzeln adden. entweder zwischenzeitlich in ne stringlist verfrachten, oder selbst nach zeilenumbrüchen suchen.

statusbar: such hier im forum nach ner kombination der worte "fortschritt balken progress bar download runterladen downloaden datei"

[Äfan]

Naja OK, trotzdem Danke.

Statusbar: Die suche brachte nichts, und StatusBar und ProgressBar sind zwei unterschiedliche Objekte.

[teebee]

Wie wäre es damit:mitListBox1.Items.Text := Cache; Gruß, teebee

[plumper]

Und zum StausBar-Problem:

StatusBar and simpletext?

Jens

[ripper8472]

[edit] sorry, ich hab ne gewaltige Sehschwäche, deshalb stand hier mal was sinnloses

[themason26]

hallo ,

kann es sein, dass den string den du reinbekommst nur mit CR (#13) also von UNIX und nicht mit CR/LF (#13#10) also von DOS kommt ? ich weiß nicht genau wie dein string aussieht, den du reinbekommst. aber ich würde den daraufhin mal untersuchen und dann gegebenenfalls ein LF #10 einfügen.
wenn alles nix hilft mußt du wohl die strings trennen und separat in die listbox packen.

gruß
mason

[Äfan]

@ TeeBee: Danke genau das habe ich gesucht
@ themason26: Was ?
@ Plumper: Danke