248     AddFileLog('Error: Could not allocate memory for screenshot.');

   248     AddFileLog('Error: Could not allocate memory for screenshot.');

   249     MakeScreenshot:= false;

   249     MakeScreenshot:= false;

   250     exit;

   250     exit;

   251 end;

   251 end;

   252 

   252 

   254 if dump > 0 then

   254 if dump > 0 then

   255     begin

   255     begin

   256     for y:= 0 to LAND_HEIGHT-1 do

   256     for y:= 0 to LAND_HEIGHT-1 do

   257         for x:= 0 to LAND_WIDTH-1 do

   257         for x:= 0 to LAND_WIDTH-1 do

   258             if dump = 2 then

   258             if dump = 2 then

   272                 else

   272                 else

   273                     PLongWordArray(p)^[y*LAND_WIDTH+x]:= 0

   273                     PLongWordArray(p)^[y*LAND_WIDTH+x]:= 0

   274                 end

   274                 end

   275     end

   275     end

   276 else

   276 else

   277     begin

   278     begin

   278     glReadPixels(0, 0, cScreenWidth, cScreenHeight, format, GL_UNSIGNED_BYTE, p);

   279     glReadPixels(0, 0, cScreenWidth, cScreenHeight, format, GL_UNSIGNED_BYTE, p);

   279 {$IFDEF USE_VIDEO_RECORDING}

   280 {$IFDEF USE_VIDEO_RECORDING}

   280     ReduceImage(p, cScreenWidth, cScreenHeight, k)

   281     ReduceImage(p, cScreenWidth, cScreenHeight, k)

   281 {$ENDIF}

   282 {$ENDIF}