SetTextAreaFont

I have a problem with using SetTextAreaFont. I use this:

	font=RequestFont()
	If font>0 
		myfont$=FontName$(font) ;In this case "Arial"
		fonth=FontSize(font) ;In this case size 16
		SetTextAreaFont textarea1,font
	EndIf

This seems to work fine. I then save the font info. When I load it and use this:

        myfont$="Arial"
        fonth=16
	fnt=LoadFont(myfont$,fonth)
	SetTextAreaFont textarea1,fnt

The font appears much smaller. Not the size selected.

If I use SetFont after LoadFont() B+ will crash (Invalid Blitz2D Handle). I think this is because I'm not initiating any Graphic modes.

So If I have'nt lost you, I'm looking for help :)

L8r,

SetTextAreaFont - Problem