Delphi'de binary dosya nasıl okunur?

var
  FileStream: TFileStream;
  Line: string;
begin
  // Binary dosyayı aç
  FileStream := TFileStream.Create('filename.ext', fmOpenRead);
  try
    // Dosyanın içeriğini oku
    SetLength(Line, FileStream.Size);
    FileStream.Read(Line[1](https://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TBinaryReader), FileStream.Size);
    // Verileri işle
  finally
    FileStream.Free;
  end;
end;
Kopyala