Leer un Archivo Binario

[*Caro*]

Hola, necesitas hacer un ciclo paar leer todo lo que tienes en el archivo.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
estudiante : TEstudiante;
linea : String;
F         : File of TEstudiante;
begin
if OpenDialog1.Execute then
begin
  AssignFile( F, OpenDialog1.FileName );
  Reset( F );
  While not Eof(F) do
   begin  
    Readln( F, Linea);
    ShowMessage(Linea);
   // Cerramos el fichero
  end;
  CloseFile( F );
end;

También puedes utilizar un StringList.

Saluditos