Final Fantasy Style Text Boxes?

Hi all. I have made a function that pastes a bitmap and then writes text over it. It works good, but I am having trouble removing it from the screen. I have other bitmaps on the screen that form a HUD, and if I used CLS it removes everything that is not updated from the screen... I was wondering how I could make a "Delete box" function... Thanks im advance.

it's just the order you draw things.

Graphics 320,200,32,2
SetBuffer BackBuffer()

While Not KeyHit(1)
	Draw(1)
	Draw(2)
	If KeyDown(57)
		Cls
		Draw(1)
	EndIf
	Flip
Wend

Function Draw(ID%)
	If ID% = 1
		Rect 20,20,20,20
	ElseIf ID% = 2
		Rect 40,40,40,40
	EndIf
End Function

Just cls then draw all the bitmaps and text except the one you want to disappear.