Ein Zeichen aus Textfile lesen

[gerritlober]

Hallo,

wie kann ich aus einem Textfile nur ein Zeichen lesen?
(Ich muss zugeben, ist ne blöde Frage, ich habs schon mal gewusst)

[sakura]

Zum Beispiel:

Delphi-Quellcode:

var
  Ch: Char;
  FS: TFileStream;
begin
  FS := TFileStream.Create('C:\dateiname', fmOpenRead or fmSharyDenyNone);
  try
    FS.Position := 15; // 16. Zeichen lesen
    // in Ch ist dann das Zeichen
    FS.ReadBuffer(Ch, SizeOf(Ch));
  finally
    FS.Free;
  end;

......