GrabSprite crashes

[poshu]

Code: Select all

Procedure Handler_RenderFrame()
   DisplaySprite(0,0,0)
   Debug "yep!"
   GrabSprite(1,10,10,35,35)
   Debug "nop T_T"
   FlipBuffers()
EndProcedure

InitSprite()
OpenScreen(300,300,0,"CRASH!")

CreateSprite(0,300,300)
StartDrawing(SpriteOutput(0))
Box(0,0,300,300,$F0F0FF)
StopDrawing()

BindEvent(#PB_Event_RenderFrame,@Handler_RenderFrame())
FlipBuffers()