Have a simple menubar (using AppCompat), setup like this:
Sub TextToBitmap(s As String, FontSize As Float, lFontColour As Long, _
iWidth As Int, iHeight As Int, _
TF As Typeface, strAlignment As String) As Bitmap
Dim bmp As Bitmap
Dim cvs As Canvas...