String aus Datei füllen

[Z32]

Hallo,

ich glaube, dass es diese Frage schon oft gab, doch ich habe bisher noch nicht genau das gefunden was ich brauche.

Ich weiß bisher, wie ich eine Eingabe von einem Memo-Feld in eine *txt Datei schreiben kann und umgekehrt auch wieder auslesen kann. Jetzt habe ich die Frage, ob das auch mit einem String geht. Also das man einen String mit einer *txt Datei füllt. Natürlich darf in der *txt Datei nicht zu viel Text drinn sein, doch bisher hat das bei mir noch nicht geklappt.

Ich habe es so probiert:

Delphi-Quellcode:

var eingabe: string;
begin
eingabe.lines.loadfromfile('text.txt');
end;

[Klaus01]

mit einem String geht das nicht.
Dort paßt nur ein string hinein.

Was Du suchst ist vielleicht eine Stringlist.

Delphi-Quellcode:

var
  stringlist: TStringlist;
begin
  stringlist:=TStringlist.create;
  stringlist.loadfromfile(filename);
  // mache was mit der stringlist
  stringlist.free
end;

Grüße
Klaus

[marabu]

In Anlehnung an das Beispiel von Klaus:

Delphi-Quellcode:

var
  eingabe: String;
  stringlist: TStringlist;
begin
  stringlist := TStringlist.create;
  stringlist.loadfromfile(filename);
  // so wird der gesamte Inhalt als String bereit gestellt
  eingabe := stringlist.text;
  // und so nur die erste Zeile
  if stringlist.count > 0 then
    eingabe := stringlist[0];
  stringlist.free
end;

Grüße vom marabu

[mkinzler]

In eine string passt sie schon, nur ist string halet ein normaler typ und keine Klasse, welche die verwendeten Methoden hat. Mit Hilfe einer StringListe ( wie Klaus01 schon beschrieben hat) kannst du die textdatei aber in einen String schreiben.

Delphi-Quellcode:

var
  stringlist: TStrings;
  s: string;
begin
  stringlist:=TStringlist.create;
  stringlist.loadfromfile(filename);
  s := stringlist.text;
  stringlist.free;
end;

oder hat mit den klassischen Pascaldateifunktionen.

[Edit: 2 gleiche Vorschlage ]

[Klaus01]

na, da habe ich auch etwas dazugelernt.

Grüße und ein schönes Wochenende
Klaus