Blitz (15/172)

From:Damir Arh
Date:6 Sep 2000 at 11:50:27
Subject:CopyShape replacement

Hello!

You might remember that a few days ago I wrote to this list with a problem
of CopyShape command trashing the shapes when they are too big. After the
resposes to this list I investigated the problem further and found out that
it was indeed a problem of overflowing the allbpmem value which is a word. I
wrote a replacement for the command (stil have to do it for the Scale
command) and I'd like you to test it. It works fine on my system in my
program but I'd like to be sure. It's used just the same as the original
command is.

Statement FixedCopyShape{source,destination}
*srcshp.shape = Addr Shape(source)
*dstshp.shape = Addr Shape(destination)
InitShape destination,*srcshp\_pixwidth,*srcshp\_pixheight,*srcshp\_depth
CopyMem_ *srcshp\_data, *dstshp\_data, *srcshp\_onebpmem * *dstshp\_depth
MakeCookie destination
End Statement

Kind regards



Damir Arh, programmer
Windows and Amiga developer
Visit: http://damir.gajba.net/

---------------------------------------------------------------------
To unsubscribe, e-mail: blitz-list-unsubscribe@netsoc.ucd.ie
For additional commands, e-mail: blitz-list-help@netsoc.ucd.ie