Picture SaveasPNG

Hi,
I want to save content of textarea into graphic using picture.saveasPNG punction
the textarea is placed in a window.

this is works perfectly when the text is shorter.
when the text is more longer, the picture is trimmed.

any way how to avoid this ?

I am using this code

Dim pict As Picture
Dim ff as FolderItem
ff = SpecialFolder.UserHome.Child("logo.png")

If ff <> Nil then
pict = New Picture(self.Width, self.Height, 32)
Self.DrawInto pict.Graphics, 0, 0
pict.Save(ff, Picture.SaveAsPNG)

thanks
arief