Einzelnen Beitrag anzeigen

Gentleman

Registriert seit: 29. Sep 2004
302 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: text aus .txt laden - auf label anzeigen

  Alt 23. Sep 2006, 14:35
Hallo!

Du könntest einfach alle Zeilen "aneinanderhängen" und den gesamten String dann in das Label schreiben. für ne neue Zeile könntest du dann ja einfach ein #13 einbauen...


Beispiel:

Delphi-Quellcode:
var
  txt: TStringList;
  i: Integer;
  temp: String;
begin
  txt:= TStringList.Create;
  txt.LoadFromFile('textdatei.txt');
  
  for i:= 0 to txt.count - 1 do
    begin
      temp:= temp + txt.Strings[i];
    end;

  Label1.Caption:= temp;
end;

Gruß,
Lennard


[EDIT] Funktoiniert zwar, aber ich habe vergessen, dass man auch einfach "txt.Text" nehmen kann, sorry
Lennard
Der Vorteil der Klugheit besteht darin, dass man sich dumm stellen kann. Das Gegenteil ist schon schwieriger. (Kurt Tucholsky)
  Mit Zitat antworten Zitat