374 cExplosionBorderColor:= c2.value or $FF000000;

   374 cExplosionBorderColor:= c2.value or $FF000000;

   375 

   375 

   376 ReadLn(f, s);

   376 ReadLn(f, s);

   377 if MusicFN = '' then MusicFN:= s;

   377 if MusicFN = '' then MusicFN:= s;

   378 

   378 

   379 Readln(f, ThemeObjects.Count);

   381 Readln(f, ThemeObjects.Count);

   380 for i:= 0 to Pred(ThemeObjects.Count) do

   382 for i:= 0 to Pred(ThemeObjects.Count) do

   381     begin

   383     begin

   382     Readln(f, s); // filename

   384     Readln(f, s); // filename

   383     with ThemeObjects.objs[i] do

   385     with ThemeObjects.objs[i] do