File of Byte

[pszopp]

Hallo Stillmatic,

soll nur die Größe der Datei oder auch der Inhalt der Datei geprüft werden?
Bei der Kontrolle des Inhalts sollten besser TStream-Objekte (genauer TFileStream oder TMemoryStream) aus der Unit Classes benutzt werden.

Ein byte-weises Einlesen einer Datei sollte so funktionieren:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var lFile : file of Byte;
    lData : Byte;
begin
  AssignFile(lFile, 'C:\TestFile.bin');
  Reset(lFile);

  try
    while (not EOF(lFile)) do begin
      Read(lFile, lData);
      // hier irgendwas mit lData anstellen!
    end; // while

  finally
    CloseFile(lFile);
  end; // finally
end;

PS: Habs zwar kompiliert aber nicht getestet!


Gruß,
pszopp