Public Sub GetMBitmap(pImg As Bitmap,pText As String,pCol As Int) As Bitmap
Private mBitmap As Bitmap = pImg
Private mCanvas As Canvas
mBitmap.InitializeMutable(pImg.Width,pImg.Height)
mCanvas.Initialize2(mBitmap)
mCanvas.DrawText(pText,5dip,10dip,Starter.UbuntuB,26,pCol,"CENTER")
Return mCanvas.Bitmap
End Sub