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 150 by alloc, Sun Apr 1 18:26:35 2007 UTC vs.
Revision 151 by alloc, Sun Apr 1 18:31:52 2007 UTC

#	Line 358 | Line 358 | begin
358		begin
359		ShowMessage(
360		IntToStr(FileID) + '-' + FileInfo.Name + '.' + FileInfo.Extension + #13#10 +
361	<	IntToStr(Stream_Body.Size));
361	>	IntToStr(FileInfo.Size) + ' - 0x' + IntToHex(FileInfo.Size, 6) + #13#10 +
362	>	IntToStr(Stream_Body.Size) + ' - 0x' + IntToHex(Stream_Body.Size, 6) );
363		Stream_Body.Write(EmptyBytes[0], 32 - (Stream_Body.Size mod 32));
364		end;
365		end

Diff Legend

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