equal
deleted
inserted
replaced
377 Maxcnt:= 3; |
377 Maxcnt:= 3; |
378 ReadLn(f) |
378 ReadLn(f) |
379 end; |
379 end; |
380 end; |
380 end; |
381 |
381 |
|
382 // sprays |
382 Readln(f, SprayObjects.Count); |
383 Readln(f, SprayObjects.Count); |
383 for i:= 0 to Pred(SprayObjects.Count) do |
384 for i:= 0 to Pred(SprayObjects.Count) do |
384 begin |
385 begin |
385 Readln(f, s); // filename |
386 Readln(f, s); // filename |
386 with SprayObjects.objs[i] do |
387 with SprayObjects.objs[i] do |
389 Width:= Surf^.w; |
390 Width:= Surf^.w; |
390 Height:= Surf^.h; |
391 Height:= Surf^.h; |
391 ReadLn(f, Maxcnt) |
392 ReadLn(f, Maxcnt) |
392 end; |
393 end; |
393 end; |
394 end; |
|
395 |
|
396 // snowflakes |
|
397 //Readln(f, ); |
394 Close(f); |
398 Close(f); |
395 {$I+} |
399 {$I+} |
396 TryDo(IOResult = 0, 'Bad data or cannot access file ' + cThemeCFGFilename, true) |
400 TryDo(IOResult = 0, 'Bad data or cannot access file ' + cThemeCFGFilename, true) |
397 end; |
401 end; |
398 |
402 |