zeilen einer text Datei übergeben

[himitsu]

Du kennst die SuFu?

Textdatei lesen
Delphi Textdatei lesen

Zitat von steffenbaumann1:

Folgendes hab ich schon

Also hast du eigentlich garnichts, denn das Gezeigte ergibt irgendwie garkeinen Sinn,
oder wurde da einfach nur zu viel Nötiges im "Code-Beispiel" weggelassen?
Aber siehe erste Antwort #2.

Zitat von DeddyH:

Delphi-Quellcode:

var
  lFileContent: TStringList;
  lLine: string;
  i: integer;
begin
  lFileContent := TStringList.Create;
  try
    lFileContent.LoadFromFile(Dateiname);
    for i := 0 to lFileContent.Count - 1 do
      begin
        lLine := lFileContent[i];
        MachWasMit(lLine);
      end;
  finally
    lFileContent.Free;
  end;
end;

Joar, eine TStringList ist schon der normale gute Weg,

wobei, es geht noch "moderner" (klein und mit automatischer Speicherverwaltung, also dynamisches Array anstatt einem StringList-Objekt)

Delphi-Quellcode:

for var Line in TFile.ReadAllLines(Dateiname) do
  MachWasMit(Line);

jaaaaaa, oder so

Delphi-Quellcode:

var
  FileContent: TArray<String>;
  Line: String;
  Index: Integer;
begin
  FileContent := TFile.ReadAllLines(Dateiname);
  for Line in FileContent do
    MachWasMit(Line);

  // oder
  for Index := 0 to High(FileContent) do
    MachWasMit(FileContent[Index]);

Und wenn es mal mehr Daten werden (weniger RAM / extrem große Datei),
dann ginge immernoch der Weg über die uralten Pascal-Prozeduren, aber den Weg sollte man heute wirklich NICHT mehr gehn.
AssignFile, Reset, ReadLn, ..., CloseFile
https://docwiki.embarcadero.com/Code...Reset_(Delphi)

Stattdessen dann eben einen FileStream, eventuell noch mit einem StreamReader dazu.
[add] siehe Antwort #3.