equal
deleted
inserted
replaced
246 Close(f); |
246 Close(f); |
247 {$I+} |
247 {$I+} |
248 TryDo(IOResult = 0, msgFailed, true); |
248 TryDo(IOResult = 0, msgFailed, true); |
249 WriteLnToConsole(msgOK); |
249 WriteLnToConsole(msgOK); |
250 val(s, cExplosionBorderColor, c); |
250 val(s, cExplosionBorderColor, c); |
|
251 TryDo(c = 0, 'Theme data corrupted', true); |
251 AdjustColor(cExplosionBorderColor); |
252 AdjustColor(cExplosionBorderColor); |
252 end; |
253 end; |
253 |
254 |
254 begin |
255 begin |
255 for fi:= Low(THWFont) to High(THWFont) do |
256 for fi:= Low(THWFont) to High(THWFont) do |