SCHNELL: Erste 100 Zeichen aus Textdatei lesen

[PeterPanino]

Hallo! Was ist die SCHNELLSTE Methode, um die ersten 100 Zeichen aus einer Textdatei auszulesen?

[Aphton]

Was hast du bisher?

[nuclearping]

Die SCHNELLSTE Methode ist relativ, bzw. abhängig von der Quelle, von der du liest.

Eine Datei von einem USB-Stick, einer Festplatte oder einer SSD zu lesen, wird zu unterschiedlichen Ergebnissen führen.

Generell nehmen sich die Methoden nicht viel, es sei denn du stellst dich an und liest Byte-für-Byte.

Ansonsten sind die OS-Funktionen schon relativ performant, also TFileStream.Read, AssignFile / BlockRead, FileOpen / FileRead, ...

Wenn man's übertreiben und jede Millisekunde rausholen will, kann man sich mit MemoryMapping befassen.

Aber ob's das wert ist.

Was willst du denn machen?

[PeterPanino]

Ich verwende bisher folgende Funktion:

Delphi-Quellcode:

function GetStartBlockFromTextFile(const F: string; const X: Integer): string;
// holt die ersten X Zeichen aus der Text-Datei F
var
  SR : TStreamReader;
  Buffer: TCharArray;
begin
  SR := TStreamReader.Create(F);
  try
    SetLength(Buffer, X);
    SR.ReadBlock(Buffer, 0, Length(Buffer));
    Result := string(Buffer);
  finally
    SR.Free;
  end;
end;

Das ist zwar schon recht schnell, weil von einer SSD gelesen wird, aber ich frage mich, ob das auch von einer normalen Festplatte schnell genug für meinen Zweck ist, da die Funktion mehrmals hintereinander aufgerufen wird.

[Jumpy]

Du sagst, dass das mehrfach hintereinader genutzt wird. Wenn sich in der Zwischenzeit aber an der Datei nichts ändert, wäre es vllt. sinnig, das ausgelesene in einer Art Dictionary zu speichern, wobei der Filename F der Key ist. Die Funktion guckt dann, ob es zu F schon einen Eintrag gibt, wenn nicht liest sie die Datei aus und legt dafür einen neuen Eintrag an.

[Neutral General]

Ich schätze mal es sind (auch) verschiedene Textdateien.

Wenn die Textdateien nicht zuu groß sind, dann sollte TFileStream oder deine Methode schnell genug sein. Wenn du jetzt ne 300 MB Textdatei (oder sogar noch größer) hast dann wird es einen Moment dauern bis die Datei geladen ist. In dem Fall wären MMFs wahrscheinlich besser.

In dem Fall kannst du dir ja evtl mal http://www.delphipraxis.net/113289-mapped-streams.html anschauen. Der TFileStreamEx wäre in dem Fall deine 1. Wahl.

[p80286]

Zitat von PeterPanino:

Hallo! Was ist die SCHNELLSTE Methode, um die ersten 100 Zeichen aus einer Textdatei auszulesen?

die Frage ist rein akademisch, die meiste Zeit wird draufgehen um den Windowscache zu einer ordentlichen Zusammenarbeit zu Überreden.
In der Praxis wird es erst ab ca 1 MB interessant darber zu reden.

Gruß
K-H