ViewVC Help

View File | Revision Log | View Changeset | Root Listing

root/Oni2/oup/current/Tools/TxmpReplace.pas

Comparing oup/current/Tools/TxmpReplace.pas (file contents):
Revision 232 by alloc, Thu Jun 28 09:24:08 2007 UTC vs.
Revision 255 by alloc, Tue Dec 18 20:48:24 2007 UTC

#	Line 176 | Line 176 | begin
176		newsize := mem.Size;
177		mem.Seek(0, soFromBeginning);
178
179	<	if (newsize > old_size) and (ConManager.Connection[ConnectionID].Backend = DB_ONI) then
179	>	if (newsize > old_size) and (ConManager.Connection[ConnectionID].Backend in [DB_ONI, DB_ONISPLIT]) then
180		new_rawaddr := ConManager.Connection[ConnectionID].AppendRawFile(
181		not (ConManager.Connection[ConnectionID].DataOS = DOS_WIN), mem)
182		else
#	Line 189 | Line 189 | begin
189		oldfading := oldfading or $01
190		else
191		oldfading := oldfading and (not Byte($01));
192	<	ConManager.Connection[ConnectionID].UpdateDatFilePart(fileid, $88, 1, @datbyte);
192	>	ConManager.Connection[ConnectionID].UpdateDatFilePart(fileid, $88, 1, @oldfading);
193		datbyte := $10;
194		//    if check_transparency.Checked then
195		//      datbyte := datbyte or $04;

Diff Legend

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