Ошибка времени выполнения чтение после конца потока невозможно

В паскале (да и не только) данные в типизированном файле (в вашем случае — file of integer) хранятся в шестнадцатиричном виде. В паскале integer занимал 2 байта, именно поэтому выскочила ошибка «Чтение после конца потока невозможно», ведь «8» — это один байт.

Если вы хотите читать целые числа из текстового файла, используйте TextFile (или Text в олдскульном варианте). Для freepascal, pascalABC.NET и Delphi это будет так:

var 
  a : integer; 
  f : TextFile;
begin
  AssignFile(f, 'f.txt');
  Reset(f);
  //Seek(f, 0);
  Read(f, a); // a = 8, хотя лучше читать сразу всю строку, используя несколько переменных

  <...>
 CloseFile(f);

end.

А в варианте для Turbo Pascal и самых первых версий Delphi — так:

var 
  a : integer; 
  f : Text;
begin
  Assign(f, 'f.txt');
  Reset(f);
  //Seek(f, 0);
  Read(f, a); { a = 8 поскольку в Turbo Pascal // не было комментарием :) }

  <...>
  Close(f);
end.

type
  base = record
    n1, n2: string[15];
    tel: string[4];
    d, m: byte;
    y: integer;
  end;
 
var
  r: base;
  a: array [1..10] of base; f: file of base; 
  i: integer;
 
begin
  assign(f, 'in.dat');
  rewrite(f); // создаем новый файл
  for i := 1 to 10 do // заполняем его 10 значениями "от балды", чтобы был понятен принцип
  begin
    r.d := i; r.m := i; r.y := i; // тут тестовые значения
    r.n1 := 'start';
    r.n2 := 'finish';
    r.tel := '3234';
    write(f, r); // пишем структуру в файл
  end;
  close(f);
  
  reset(f); // переоткрываем файл уже для чтения
  i := 0;
  while not eof(f) do // и читаем содержимое в массив a
  begin
    inc(i);
    read(f, a[i]); // в этой строке не показывает никакой ошибки
  end;
  close(f);
end.

Приветствую, мне требуется ваша помощь, уже не знаю, что делать, весь интернет перерыл, и всем помогает Position = 0,а мне нет.

private static byte[] buffer = new byte[1024];
    private static MemoryStream stream = new MemoryStream(buffer);
    private static BinaryWriter writer = new BinaryWriter(stream);
    private static BinaryReader reader = new BinaryReader(stream);

    private List<string> listCode = new List<string>();

void ReceiveData()
    {
        int bytes = 0;

        EndPoint remoteIp = new IPEndPoint(IPAddress.Any, 0);
        listCode.Clear();

        do
        {
            bytes = socket.ReceiveFrom(buffer, ref remoteIp);
        }
        while (socket.Available > 0);


        bool getData = true;

        stream.Position = 0;

        try
        {
            while (getData)
            {
                string data = reader.ReadString(); // ВОТ ТУТ КОД ВЫДАЕТ ИСКЛЮЧЕНИЕ ПОСЛЕ ТОГО КАК ДАННЫЕ С СЕРВЕРА ПРИХОДЯТ 2-ОЙ РАЗ
                if (data != "")
                    listCode.Add(data);
                else
                    getData = false;
            }
        }
        catch(Exception ex)
        {
            Debug.Log(ex.Message);
        }

        stream.SetLength(0);
        stream.Position = 0;

        IPEndPoint remoteFullIP = remoteIp as IPEndPoint;
    }

Подскажите пожалуйста! Всем спасибо!

Всем доброго времени суток, столкнулся с проблемой

Чтения после конца потока невозможно

Дело в том что я читаю бинарный файл :

 while (reader2.PeekChar() > -1)
 {

    numb2 = reader2.ReadInt32();

    Int32 ndef2 = reader2.ReadInt32();

    BitVector32 bv2 = new BitVector32(ndef);

    int nr2 = bv2[nr_s];

    y2 = bv2[y_s];

    int sm2 = bv2[sm_s];

    ds2 = bv2[d_s];

    ms2 = bv2[m_s];

    int rs2 = bv2[r_s];

}

И так получилось что numb2 имеет запись в файле поэтому reader2.PeekChar() > -1 больше 1, но вот ndef2 уже нету в файле, и я получаю ошибку чтения после конца потока, может есть более правильный метод инициализации данных в файле, и если дальше записи нет, то просто передать 0 и перейти дальше, либо пропускать и идти дальше, просто не хотелось бы делать что-то вроде:

 while (reader2.PeekChar() > -1)
 {

    numb2 = reader2.ReadInt32();

  if (reader2.PeekChar() > -1){

    Int32 ndef2 = reader2.ReadInt32();

    BitVector32 bv2 = new BitVector32(ndef);

    int nr2 = bv2[nr_s];

    y2 = bv2[y_s];

    int sm2 = bv2[sm_s];

    ds2 = bv2[d_s];

    ms2 = bv2[m_s];

    int rs2 = bv2[r_s];
    }

}

Или все же придется ставить еще одну проверку, как я написал выше ?
Помогите пожалуйста разобраться.