Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Zeilen in einer Datei zählen

    Delphi
    by himitsu, 20. Mai 2006
  Also, selbst wenn bei TextFile ein Fehler auftreten sollte dann ist wäre das Speicherleck jedenfalls geringer, als wenn was bei der StringList passiert (nach den obrigen Codes)
  
  Aber man kann ja auch nochmehr an Code einsparren und die ganzen I/O-Checks weglassen
  Var F: TextFile;
  Count: Integer;
  
  Count := 0;
  AssignFile(F, ...);
  FileMode := fmOpenRead;
  {$I-}
• Forum: Sonstige Fragen zu Delphi

  Re: Zeilen in einer Datei zählen

    Delphi
    by himitsu, 20. Mai 2006
  meines ist eventuell nicht so schnell (kommt drauf an wieviele Zeilen es gibt und wie groß die Datei ist), aber es gibt garantiert kein Speicherleck und der Speicherverbrauch ist auch total gering (460 Byte bis maximal Zeilenlänge), da ja nicht die ganze Datei im Speicher landet
• Forum: Sonstige Fragen zu Delphi

  Re: Zeilen in einer Datei zählen

    Delphi
    by himitsu, 19. Mai 2006
  Oder so:
  Var F: TextFile;
  Count: Integer;
  
  Count := 0;
  AssignFile(F, ...);
  FileMode := fmOpenRead;
  Reset(F);
  While not EoF(F) do Begin
  ReadLn(F);