438                     for y := 0 to tmpsurf^.h-1 do

   438                     for y := 0 to tmpsurf^.h-1 do

   439                         begin

   439                         begin

   440                         for x := 0 to tmpsurf^.w - 1 do

   440                         for x := 0 to tmpsurf^.w - 1 do

   441                             (rowData + x)^:= (PByte(tmpsurf^.pixels) + y * tmpsurf^.pitch + x * 4 + AByteIndex)^;

   441                             (rowData + x)^:= (PByte(tmpsurf^.pixels) + y * tmpsurf^.pitch + x * 4 + AByteIndex)^;

   442                         syncedPixelDigest:= Adler32Update(syncedPixelDigest, rowData, tmpsurf^.w);

   442                         syncedPixelDigest:= Adler32Update(syncedPixelDigest, rowData, tmpsurf^.w);

   444                         end;

   443                         end;

   445                     FreeMem(rowData, tmpsurf^.w);

   444                     FreeMem(rowData, tmpsurf^.w);

   446                     end;

   445                     end;

   447                 end;

   446                 end;

   448 

   447