How to use untyped files?
Quote
Carlos Madrigal wrote:
????
Var F : File;
written,haveread : Integer;
Assign(F,'MYFILE.DAT');
Rewrite(F,1); {yields max flexibilitiy}
BlockWrite(F,FirstRec,sizeof(FirstRec),written);
BlockWrite(F,MyVar,sizeof(MyVar),written);
Seek(F,sizeof(FirstRec));
BlockRead(F,MyVar2,sizeof(MyVar),haveread);
Close(F);
Hope it helps understanding!? More:
http://www.geocities.com/~franzglaser/tp.html
Regards,
Franz Glaser
http://members.eunet.at/meg-glaser