equal
deleted
inserted
replaced
150 x1:= 0; |
150 x1:= 0; |
151 until y > 900; |
151 until y > 900; |
152 if x1 > 0 then |
152 if x1 > 0 then |
153 begin |
153 begin |
154 Result:= true; |
154 Result:= true; |
155 tmpsurf:= LoadImage(Pathz[ptGraphics] + 'Girder.png'); |
155 tmpsurf:= LoadImage(Pathz[ptGraphics] + 'Girder.png', false); |
156 rr.x:= x1; |
156 rr.x:= x1; |
157 rr.y:= y; |
157 rr.y:= y; |
158 while rr.x + 100 < x2 do |
158 while rr.x + 100 < x2 do |
159 begin |
159 begin |
160 SDL_UpperBlit(tmpsurf, nil, Surface, @rr); |
160 SDL_UpperBlit(tmpsurf, nil, Surface, @rr); |
269 for i:= 1 to n do |
269 for i:= 1 to n do |
270 begin |
270 begin |
271 Readln(f, s); // filename |
271 Readln(f, s); // filename |
272 with ThemeObjects[i] do |
272 with ThemeObjects[i] do |
273 begin |
273 begin |
274 Surf:= LoadImage(Pathz[ptThemeCurrent] + s + '.png'); |
274 Surf:= LoadImage(Pathz[ptThemeCurrent] + s + '.png', false); |
275 Read(f, Width, Height); |
275 Read(f, Width, Height); |
276 with inland do Read(f, x, y, w, h); |
276 with inland do Read(f, x, y, w, h); |
277 Read(f, rectcnt); |
277 Read(f, rectcnt); |
278 for ii:= 1 to rectcnt do |
278 for ii:= 1 to rectcnt do |
279 with outland[ii] do Read(f, x, y, w, h); |
279 with outland[ii] do Read(f, x, y, w, h); |