ViewVC Help

View File | Revision Log | View Changeset | Root Listing

root/Oni2/oup/current/Global/OniImgClass.pas

Comparing oup/current/Global/OniImgClass.pas (file contents):
Revision 243 by alloc, Sun May 27 20:03:41 2007 UTC vs.
Revision 244 by alloc, Fri Aug 17 21:09:51 2007 UTC

#	Line 413 | Line 413 | begin
413		link := link div 256;
414		images[i] := TOniImage.Create;
415		images[i].LoadFromTXMP(ConnectionID, link);
416	–	SetLength(FImages, 1);
417	–	NewImage(width, height, ifA1R5G5B5, FImages[0]);
416		end;
417	+	SetLength(FImages, 1);
418	+	NewImage(width, height, images[0].Format {ifA1R5G5B5}, FImages[0]);
419		for y := 0 to rows - 1 do
420		begin
421		for x := 0 to cols - 1 do
#	Line 425 | Line 425 | begin
425		y_start := 0;
426		for i := 0 to x do
427		if i < x then
428	<	x_start := x_start + images[i].Image[0].Width;
428	>	x_start := x_start + images[i].Image[1].Width;
429		for i := 0 to y do
430		if i < y then
431	<	y_start := y_start + images[i].Image[0].Height;
432	<	CopyRect(images[imgid].Image[0], 0, 0, images[imgid].Image[0].Width,
433	<	images[imgid].Image[0].Height, FImages[0], x_start, y_start);
431	>	y_start := y_start + images[i].Image[1].Height;
432	>	CopyRect(images[imgid].Image[1], 0, 0, images[imgid].Image[1].Width,
433	>	images[imgid].Image[1].Height, FImages[0], x_start, y_start);
434		end;
435		end;
436		for i := 0 to linkcount - 1 do

Diff Legend

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