Inhalt von mehreren Textdateien in eine Schreiben

[Drome]

Meine Frage ist, wie kann ich den Inhalt von 3 Textdateien auslesen und in eine neuen Textdatei schreiben.

[mkinzler]

Wie soll vorgegangen werden? Mischen? Aneinanderhängen?

[Drome]

Aneinander hängen also:
Inhalt der ersten Textdatei
Inhalt der zweiten Textdatei
Inhalt der dritten Textdatei

[DeddyH]

Das geht IMHO am Einfachsten mit StringListen.

Delphi-Quellcode:

var sList, tmpList: TStringList;
begin
  sList := TStringList.Create;
  tmpList := TStringList.Create;
  try
    sList.LoadFromFile(erste_Datei);
    tmpList.LoadFromFile(zweite_Datei);
    sList.AddStrings(tmpList);
    tmpList.LoadFromFile(dritte_Datei);
    sList.AddStrings(tmpList);
    sList.SaveToFile(neue_Datei);
  finally
    sList.Free;
    tmpList.Free;
  end;
end;

[mkinzler]

Oder klassisch mit TextFile oder Stream

[DeddyH]

Dann aber lieber per Streams ;)

[Drome]

Danke, genau das habe ich gesucht.

Delphi-Quellcode:

var sList, tmpList: TStringList;
begin
  sList := TStringList.Create;
  tmpList := TStringList.Create;
  try
    sList.LoadFromFile(erste_Datei);
    tmpList.LoadFromFile(zweite_Datei);
    sList.AddStrings(tmpList);
    tmpList.LoadFromFile(dritte_Datei);
    sList.AddStrings(tmpList);
    sList.SaveToFile(neue_Datei);
  finally
    sList.Free;
    tmpList.Free;
  end;
end;

mehr brauche ich für meine Zwecke im momment nicht.