ViewVC Help

View File | Revision Log | View Changeset | Root Listing

root/Oni2/oup/current/Helper/LevelDB.pas

Comparing oup/current/Helper/LevelDB.pas (file contents):
Revision 146 by alloc, Sun Apr 1 15:40:16 2007 UTC vs.
Revision 150 by alloc, Sun Apr 1 18:26:35 2007 UTC

#	Line 355 | Line 355 | begin
355		DatFileStream.Seek(0, soFromBeginning);
356		Stream_Body.CopyFrom(DatFileStream, DatFileStream.Size);
357		if (Stream_Body.Size mod 32) > 0 then
358	+	begin
359	+	ShowMessage(
360	+	IntToStr(FileID) + '-' + FileInfo.Name + '.' + FileInfo.Extension + #13#10 +
361	+	IntToStr(Stream_Body.Size));
362		Stream_Body.Write(EmptyBytes[0], 32 - (Stream_Body.Size mod 32));
363	+	end;
364		end
365		else
366		FilesHeader[FileID].DataAddr := 0;

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines (old)
>	Changed lines (new)