怎么读.dat里的数据

我的c忘记光了
这.dat是用c写的，怎么用delphi把它读出来，谢谢。
struct g_power {
int ys;  /*功率因素*/
long int gl;     /*功率*/
};void main(int argc,unsigned char *argv[])
{
FILE *fp;
int i,j;
struct g_power c_power[16];        //每个组当前圈功率和功率因素 if(argc != 2) {cprintf("\r\n使用说明:dis_xl 文件名");return;}
fp=fopen(argv[1],"rb");
if(fp!=NULL)
{
printf("序号 第 1组数据  第 2组数据  第 3组数据  第 4组数据  第 5组数据  ");
printf("第 6组数据  第 7组数据  第 8组数据  第 9组数据  第10组数据  ");
printf("第11组数据  第12组数据  第13组数据  第14组数据  第15组数据  ");
printf("第16组数据\n"); while(!feof(fp))
{
fread(&i,sizeof(int),1,fp);
fread(c_power,sizeof(struct g_power)*16,1,fp);
printf(" %2d ",i);
for(j=0;j<16;j++) printf(" %2d %7ld ",c_power[j].ys,c_power[j].gl);
printf("\n");
}
}
fclose(fp);
}