Sub Globals
Private pnlDraw As Panel
Private cvsDraw As Canvas
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout")
cvsDraw.Initialize(pnlDraw)
DrawTextOutlined(cvsDraw, "Test", 20dip, 100dip, 70, Colors.Red, 3dip, Colors.Blue)
End Sub
Private Sub DrawTextOutlined(cvs As Canvas, Text As String, x As Int, y As Int, TextSize As Float, TextColor As Int, StrokeWidth As Int, StrokeColor As Int)
Private ExtDraw As ABExtDrawing
Private ExtPaint1, ExtPaint2 As ABPaint
ExtPaint1.Initialize
ExtPaint1.SetTextSize(TextSize * xui.Scale) ' in Android Canvas the text size is in pixels, therefore the multiplication by xui.Scale
ExtPaint1.SetStyle(ExtPaint1.Style_STROKE)
ExtPaint1.SetStrokeWidth(StrokeWidth * 2) ' multiplication by two the stroke is only outsides.
ExtPaint1.SetColor(StrokeColor)
ExtDraw.drawText(cvs, Text, x, y, ExtPaint1)
ExtPaint2.Initialize
ExtPaint2.SetTextSize(TextSize * xui.Scale)
ExtPaint2.SetColor(TextColor)
ExtDraw.drawText(cvs, Text, x, y, ExtPaint2)
End Sub