Index: /oup/current/Helper/LevelDB.pas
===================================================================
--- /oup/current/Helper/LevelDB.pas	(revision 149)
+++ /oup/current/Helper/LevelDB.pas	(revision 150)
@@ -356,5 +356,10 @@
       Stream_Body.CopyFrom(DatFileStream, DatFileStream.Size);
       if (Stream_Body.Size mod 32) > 0 then
+      begin
+        ShowMessage(
+            IntToStr(FileID) + '-' + FileInfo.Name + '.' + FileInfo.Extension + #13#10 +
+            IntToStr(Stream_Body.Size));
         Stream_Body.Write(EmptyBytes[0], 32 - (Stream_Body.Size mod 32));
+      end;
     end
     else