如何循环读出TXT中的数据

TXT文件数据格式
aaaa 222.2 222.2 3
100,200
300,300
400,400
bbbb 111.2 111.2 5
500,200
500,300
500,400
500,300
500,400
cccc 333.2 333.2 4
600,200
600,300
600,400
700,700
........

老师要求按原来的格式读出来。我现在只能把一部分的读出来，请问加什么循环条件可以全部写出来？
fr.ReadString(str);
   
 str.Replace(',',' ');
 sscanf(str,"%s %f %f %d\n",s1,&x,&y,&n);
 str.Format("%s %f %f %d\n",s1,x,y,n);

 fw.WriteString(str);
  for(i=0;i<n;i++)
{  
               
fr.ReadString(str1);
str1.Replace(',',' ');
sscanf(str1,"%f %f",&h,&v);
str1.Format("%f %f\n",h,v);
 fw.WriteString(str1);
}