Android Question How i can add border to text?

Sort by date Sort by votes
mangojack

mangojack

Expert
Licensed User
Longtime User
Declare the Label as B4XView and set the Width to -2 (autosize depending on text)

adjusting label width according to text

Hello, I found out that via string utils i can mesaue the height but is there any way to set the label's width according to text's length ( for example if label is hello the width will be shorter but if its hello world than it will be longer ) TY
www.b4x.com www.b4x.com

B4X: 
    Label1.Width = -2    'Can be done in Designer also ..
    Label1.Text = "12345"
    Label1.SetColorAndBorder(xui.Color_White, 2dip, xui.Color_Black, 0)
 
Upvote 0
mangojack

mangojack

Expert
Licensed User
Longtime User
The above code results in the following ...

Capture.PNG
Capture2.PNG


If this is not the desired result , possibly this thread might help.

[B4X] [XUI] Accurate Text Measurement and Drawing

(It took me 7 years to get this one right.) XUI v1.60 includes a new method named B4XCanvas.MeasureText. This method accurately measures single line strings. It returns a B4XRect object with the width and height of the measured string. The Top field returns the highest point relative to...
www.b4x.com www.b4x.com
 
Last edited:
Upvote 0
mangojack

mangojack

Expert
Licensed User
Longtime User
Last edited:
Upvote 0
mangojack

mangojack

Expert
Licensed User
Longtime User
Haven' go time to test it , but possibly download the correct / wanted font from a free font site and load it from assets using xui.CreateFont() maybe ?
 
Upvote 0
mangojack

mangojack

Expert
Licensed User
Longtime User
Alhootti said:
there are Errors
Click to expand...
You should post your error messages as text ...


Upload your project as a .zip file.

Non B4XPages project : File Menu > Export as Zip

B4XPages project :
Capture.PNG
 
Upvote 0
TILogistic

TILogistic

Expert
Licensed User
Longtime User
other simple.
You can move the outline wherever you want, the trick is in the x,y position.
B4X: 
DrawTextWithOutline("Hello, World!", 100, 100, xui.Color_White, xui.Color_Black, 48)
B4X: 
Sub DrawTextWithOutline(text As String, x As Float, y As Float, textColor As Int, outlineColor As Int, textSize As Float)
    Dim xFont As B4XFont = xui.CreateDefaultFont(textSize)
    xCanvas.DrawText(text, x - 1, y, xFont, outlineColor, "LEFT")
    xCanvas.DrawText(text, x + 1, y, xFont, outlineColor, "LEFT")
    xCanvas.DrawText(text, x, y - 1, xFont, outlineColor, "LEFT")
    xCanvas.DrawText(text, x, y + 1, xFont, outlineColor, "LEFT")
    xCanvas.DrawText(text, x, y, xFont, textColor, "LEFT")
    xCanvas.Invalidate
End Sub
1726292118333.png
 
Upvote 0
TILogistic

TILogistic

Expert
Licensed User
Longtime User
other Thickness and color

B4X: 
DrawTextWithOutline("Hello, World!", 100, 100, 3, 0xB5FFFFFF, xui.Color_Yellow, 48)

B4X: 
Sub DrawTextWithOutline(text As String, x As Float, y As Float, Thickness As Int, textColor As Int, outlineColor As Int, textSize As Float)
    Dim xFont As B4XFont = xui.CreateDefaultFont(textSize)
    xCanvas.DrawText(text, x - Thickness, y, xFont, outlineColor, "LEFT")
    xCanvas.DrawText(text, x + Thickness, y, xFont, outlineColor, "LEFT")
    xCanvas.DrawText(text, x, y - Thickness, xFont, outlineColor, "LEFT")
    xCanvas.DrawText(text, x, y + Thickness, xFont, outlineColor, "LEFT")
    xCanvas.DrawText(text, x, y, xFont, textColor, "LEFT")
    xCanvas.Invalidate
End Sub
1726293279650.png
 
Upvote 0
You must log in or register to reply here.
Top