关于自定义FILE类型变量操作！

Question

关于自定义文件类型的操作：
（1）怎么给tmyfile赋值
（2）怎么将tmyfile存为文件
（3）怎么从文件中读取出来
（4）怎么取得单个分支的值无分挑战CSDN高手，望不惜赐教！！！！type
//枚举
mymj=(a,b,c,d,e);
//集合
myjh=set of mymj;
//静态数组
mysz=array[1..10] of integer;
//子界
myzj=1..100;
//记录
myrecord=record
         name:array[1..10] of char;
         age:0..200;
         sex:(gril,boy);
         filed1:mymj;
         filed2:myjh;
         filed3:mysz;
         filed4:myzj;
         case tag:boolean of
              true:(filed5:integer;);
              false:(filed6:string[100]);
         end;
//文件
myfile=file of myrecord;var
tmyfile:myfile;无分挑战CSDN高手，望不惜赐教！！！！