Cloning an Image

BlitzMax Forums/BlitzMax Programming/Cloning an Image

I suppose you should unlock it for future proofing.
However, at the moment all Lockimage does is call image.lock which creates and returns a pixmap.
Unlockimage does nothing.
Anyway, once you have the pixmap you can keep using it to create images until you delete it or it goes out of scope.
Graphics 640 , 480
image:Timage = LoadImage("max.png")
mypixmap:TPixmap = LockImage(image)
Local newimage:TImage[10]
For x = 0 To 9
	newimage[x] = LoadImage(mypixmap) 
	DrawImage newimage[x] , x * 10 , 0
	Flip
Next
waitKey()