структура самоадресуемая

[TitoAlehandro]

Приветствую всех!
Есть задача:чтение двоичного файла с зараннее известной структурой.
Особенность:структура самоадресуемая(динамическое выделение памяти).
Кто-нибудь сталкивался с такой проблемой?Инет по этому поводу молчит,Архангельский только выдает примеры на создание двоичного файла,а по поводу чтения неособо.

//самоадресуемая структура

struct TEtl
        {
                AnsiString Meropr;
                AnsiString Na4_Meropr;
                AnsiString End_Meropr;
                AnsiString Parametr;
                AnsiString Na4_Parametr;
                AnsiString End_Parametr;
                TEtl * pr;
        };
//--------------------------------------

//заполнение струкутуры

           Pnew = new TEtl;
           Pnew->Meropr=Etalon->ETL_NameMeropr->Text;
           Pnew->Na4_Meropr=Etalon->Etl_MIN->Time.TimeString();
           Pnew->End_Meropr=Etalon->Etl_MAX->Time.TimeString();
           Pnew->Parametr=Edm_parametr->Text;
           Pnew->Na4_Parametr=Edm_MIN->Text;
           Pnew->End_Parametr=Edm_MAX->Text;
           Pnew->pr= NULL;
           if(P0 == NULL) P0 = Pnew;
           else Pold->pr = Pnew;
           Pold = Pnew;
//-------------------------------------------------------------



//сохранение струкутуры в файл
	FILE * F;
        Etl_SaveEtl_dialog->Execute();
        if ((F = fopen(Etl_SaveEtl_dialog->FileName.c_str(),"wb"))==NULL)
       {
        ShowMessage("Oaee ia oaaaony nio?aieou");
        return;
       }
        Pnew = P0;
        while(Pnew != NULL)
        {
                fwrite (&Pnew,sizeof(TEtl),1,F);
                Pnew = Pnew->pr;
        }
//-------------------------------------------------------------


//чтение струкутуры из файла

	TEtl *E0=NULL,*Eold,*Enew;
        ifstream ifile(Open_ETL->Dialog->FileName.c_str(),ios::binary);
        Enew=new TEtl;

        while (!ifile.read((char*)&Enew,sizeof(TEtl)).eof())
        {

                ifile.read((char*)&Enew,sizeof(TEtl));
                
                if(E0 == NULL) E0 = Enew;
                else Eold->pr = Enew;
                Eold = Enew;
         }

//-------------------------------------------------------------

Чтения как такового не происходит.Максимум - это абракадабра при первом обращении функции read, а затем выдает только одни нули.Если кто знает особенности чтения самоадресуемой структуры,help please...

[pu4koff]

мельком посмотрел.
1. При чтении структуры Вы её не создаёте и записываете информацию из файла вникуда.

while (!ifile.eof())
{
  Enew = new TEtl; // выделяем память под новую структуру
  ifile.read((char*)Enew,sizeof(TEtl)); // читаем структуру из файла
}

2. В структуре хранится указатель. Записаться он запишется, но при следующем запуске программы адресное пространство будет совершенно другое и этот указатель будет неправильным. И я не уверен, что AnsiString нормально запишется в файл, и врядли он прочтется нормально.