Неправильно работает метод ReadFile

#include "stdafx.h"
#include <iostream>
#include <conio.h>
using namespace std;
struct OS
{   char Name [20];
    int Roz;
    int Op;
};
struct TList
{   OS info;         //інформаційне поле
    TList *next;     //адреса наступного елемента
};
class CList 
{ TList *head;   //адреса голови списку
  public:
  CList()
  { head =new TList;//выделяем память голове списка
    head=NULL;
  };
  void ReadFile()//виведення даних з файла
 {  TList *p2,*pv,*pn;;
    FILE *fp;
    fp = fopen("d:/mlist.txt", "rb");
    if(!fp){
                printf("\n Невозможно открыть файл.\n");
                exit(1);
            }
    /* освободить память, если в памяти уже есть список */
     while(head)
    {   
        p2 =head->next;
        if(p2!=NULL){
                        free(p2);//освободить память
                        head =p2;
                     }
        else head=NULL;
    }
   /* сбросить указатели на начало и конец */
    head  = NULL;
    printf("\n Загрузка из файла\n");
    while(!feof(fp))
    {   
        p2=new TList;
        if(!p2){    
                    printf("\n Нет свободной памяти");
                    return;
                }
      if(1 != fread(p2, sizeof(struct TList), 1, fp))break;
      WrM(p2);
      cout<<"\n Элемент списка из файла "<<endl;
      dls_store(p2, &head);
      WrM(head);
    }
     if(head !=NULL)//если есть адресс
     {   int i=2;
         WrM(head);
         pv=head->next;
         while (pv!=NULL)//до конца списка 
         {   cout<<i<<" элемент списка ";
             WrM(pv);
             pn=pv->next;
             pv=pn;
         }
     }
     else cout<<"\n Список пуст"<<endl;;
     fclose(fp);
 };
  void ReadConsole()    //введення данних з клавіатури
 {   int i=0;
     char nam[20];//для новых введённых элементов
     int roz;
     int op;
     TList *pv,*pn;//указатели на новые элементы 
     int flag;
     cout<<"\n Введите элементы списка "<<endl;
     cout<<"\n Введите имя операционной системы :";
     cin>>nam;
     cout<<"\n Введите розрядность операционной системы :";
     cin>>roz;
     cout<<"\n Введите минимальный объём памяти :";
     cin>>op;
     head=Head(nam,roz,op);
     cout<<"\n Продолжать ?Для продолжения введите 1"<<endl;
     cout<<"\n";
     cin>>flag;
     if (flag==1){
                    cout<<"\n Введите элементы списка "<<endl;
                    cout<<"\n Введите имя операционной системы :";
                    cin>>nam;
                    cout<<"\n Введите розрядность операционной системы :";
                    cin>>roz;
                    cout<<"\n Введите минимальный объём памяти :";
                    cin>>op;
                    pv=Head(nam,roz,op);//выделяем память для второго эл. списка 
                    head->next=pv;//записываеи адресс 2-го эл. в предыдущий элемент 
     do{
            cout<<"\n Продолжать ?Для продолжения введите 1"<<endl;
            cout<<"\n";
            cin>>flag;
            if(flag==1){
                            cout<<"\n Введите элементы списка "<<endl;
                            cout<<"\n Введите имя операционной системы :";
                            cin>>nam;
                            cout<<"\n Введите розрядность операционной системы :";
                            cin>>roz;
                            cout<<"\n Введите минимальный объём памяти :";
                            cin>>op;
                            pn=Head(nam,roz,op);
                         pv->next=pn;//для следущего элемента
                       }
     else break;
     pv=pn;//для новых эл.
       }while (1);
    }
};
  void WriteFile()//запис даних у файл
{  struct TList *p1;
   FILE *fp;
   fp = fopen("d:/mlist.txt", "wb");
   if(!fp){
              printf("\n Невозможно открыть файл.\n");
              exit(1);
         }
   printf("\n Сохранение в файл\n");
   p1 = head;
   while(p1)
   {
        fwrite(p1, sizeof(struct TList), 1, fp);
        p1= p1->next;  /* перейти к следующему адресу */
   }
   cout<<"\n Список записан "<<endl;
   fclose(fp);
   cout<<"\n Файл закрыт "<<endl;
 };     
  void WriteMonitor()//видача даних на екран монітору
 {  TList *pv,*pn;
    if(head !=NULL){   //если есть адресс
                        int i=2;
                        WrM(head);
                        pv=head->next;
                        while (pv!=NULL)//до конца списка 
                       {    
                            WrM(pv);
                            pn=pv->next;
                            pv=pn;
                        }
                     }
    else cout<<"\n Список пуст";
 }; 
  void Edit()//редагування даних 
 {  cout<<"1.Добавить данные"<<endl;
    cout<<"2.Удалить данные"<<endl;
    int flag;
    cout<<"Введите команду:";
    cin>>flag;
    switch(flag)
    {case 1: Add();
     break;
     case 2:Delete();
     break;
     default:
     cout<<"Введена неккоректная команда";
     }
 };     
  void Add()
  {  char nam[20];
     int roz;
     int op;
     TList *pv,*pn;
     int flag;
     cout<<"Введите элемент списка "<<endl;
     cout<<"Введите имя операционной системы :";
     cin>>nam;
     cout<<"Введите розрядность операционной системы :";
     cin>>roz;
     cout<<"Введите минимальный объём памяти :";
     cin>>op;
     pv=head->next;
     while (pv->next!=NULL)//проверка,есть ли сл. эл.  списке 
     {  
        pn=pv->next;
        pv=pn;              //пв -последний эл. списка
     }
    pn=Head(nam,roz,op);//выделяем память для нового  эл. списка 
    pv->next=pn;//добавление нового элемента в конец списка
 
  };
  void Delete()
  {  cout<<"Введите название операционной системы:";
     char N [20];
     cin>>N;
     TList *p;
     p=Poisk2(N);//проверяем , есть ли такой элемент в списке
     if(p==NULL){//если нету элемента
                    cout<<"Такой элемент не найден";
                    return;
                }
     WrM(p);
     if(p==head){//если элемент первый в списке 
                    head=head->next;//то список начинается с сл. элемента 
                    return;
                }
     TList *pv=head;
     while (pv->next!=p)//ищет предыдущий искомому элемент 
     pv=pv->next;
     pv->next=p->next;//удаления элемента со списка
     return;
  };
 
  void Sort()
 {  TList *p1,*p2,*pp;     //пп-чтобы записать копию эл.п1 
    int flag=1;
    while(flag==1)
    {   
        p1=head;//первый
        p2=p1->next;//сл.элемент 
        flag=0;
        while(p2!=NULL)//пока не дошли до конца списка
        {   
            if(p1->info.Op>p2->info.Op){
                                            pp=Head(p1->info.Name,p1->info.Roz, p1->info.Op);//сравниваем 
                                            p1->info.Roz,p1->info.Op;
                                            p1->info.Roz=p2->info.Roz;
                                            p1->info.Op=p2->info.Op;
                                            for(int i=0;i<20;i++)
                                            p1->info.Name[i]=p2->info.Name[i];
                                            p2->info.Roz,pp->info.Op;
                                            p2->info.Roz=pp->info.Roz;
                                            p2->info.Op=pp->info.Op;
                                            for(int i=0;i<20;i++)
                                            p2->info.Name[i]=pp->info.Name[i];
                                            flag=1;
                                        }
            p1=p2;    //переход до сл.  эдл. списка 
            p2=p1->next;
        }
    }
  };
 
  void Poisk()
  {  cout<<"Введите название операционной системы:";
     char N [20];
     int f=0;
     cin>>N;
     TList *p;
     p=Poisk2(N);//указываем имя-возвращает адресс ячейки 
     if(p!=NULL)
     WrM(p); 
     else  printf("Имя не найдено.\n");
      /* нет подходящего элемента */
  };        //пошук даних за зразкомa
  TList *Poisk2(char N[20])
  {  TList *p;
     p=head;
     while(p!=NULL){
                        if(!strcmp(N, p->info.Name))
                        return p;
                        p=p->next;  /* перейти к следующему адресу */
                    }
      return NULL;
  }
  TList *Head(char nam[20],int roz, int op)//функция для размещения элемента списка в памяти 
  {  TList *pv =new TList;
     for(int j=0;j<20;j++)
     pv->info.Name[j]=nam[j];
     pv->info.Roz=roz;
     pv->info.Op=op;
     pv->next=NULL;
     return pv;
  };
 
  void WrM(TList *pv)
  {  cout<<pv->info.Name<<" ";
     cout<<pv->info.Roz<<" ";
     cout<<pv->info.Op<<endl;
  };
/* Создание упорядоченного  списка. */
  void dls_store(struct  TList *i,   /* новый элемент */
                 struct TList **head) /* первый элемент списка */
  {
    struct TList  *p;
    if(*head==NULL){  /* первый элемент списка */
                         i->next = NULL;
                         *head = i;
                         return;
                   }
     p = *head; /* начать с начала списка */
     while(p->next){
                        p = p->next;
                   }
    p->next=i;
    return;
  }
 };
int menu()          //функція видачі меню та вводу команди оператора 
 {  int kom;
    cout<< "\n 1. Чтение из файла"<<endl;                                        
    cout<< "\n 2. Ввод с клавиатуры" <<endl;
    cout<< "\n 3. Запись в файл"<<endl;
    cout<< "\n 4. Вывод на экран"<<endl;
    cout<< "\n 5. Редактирование "<<endl;
    cout<< "\n 6. Поиск"<<endl;
    cout<< "\n 7.Сортировка"<<endl;
    cout<< "\n 8. Выход "<<endl;
    cout<<"\n";
    cout<<"\n Введите номер команды :";
    cin>> kom;
    return kom;
 }
int _tmain()
{  setlocale(0,"rus");  int komanda;
   CList grup;
   do{ komanda=menu();
       switch (komanda)
       { case 1:  grup.ReadFile() ; break;
         case 2:  grup.ReadConsole (); break;
         case 3:  grup.WriteFile(); break;
         case 4:  grup.WriteMonitor (); break;
         case 5:  grup.Edit(); break;
         case 6:  grup.Poisk(); break;
         case 7:  grup.Sort();break;
         case 8:  return 0;
       }
     }
    while(komanda!=8);
    return 0;
}