Leer un fichero de tipo record

[Isuri]

Hola,

tengo un fichero de tipo record, creo que me guarda bien los datos pero cuando intento leer, no leer nada

Código Delphi [-]
function TDatos.getRegistro(Value: string): TRegistro;
var
   Registro: TRegistro;
   FMiAgenda: File of TRegistro;
begin
  AssignFile(FMiAgenda,'Mi Agenda.txt');
  try
    Reset(FMiAgenda);
    while(not EOF(FMiAgenda)) do
      read(FMiAgenda,Registro);
    ShowMessage(Registro.Nombre);
  finally
    CloseFile(FMiAgenda);
    Result := Registro;
  end;
end;

Al hacer showMessage, el mensaje que mando esta vacio

gracias