Hi!, I'm trying to set the height of the label from the string..
It almost works, but when it's a long text, it doesn't work well. Also something very strange happens, change the size of the text without me having indicated it.
Any idea? Thanks
It almost works, but when it's a long text, it doesn't work well. Also something very strange happens, change the size of the text without me having indicated it.
Any idea? Thanks
B4X:
Sub getTextHeight(content As String,fo As Font,LbWidth As Float) As Float
Dim tmpString As String = "大"
Dim str() As String = Regex.Split(Chr(10),content)
Dim height As Float
Dim number As Int
Dim fontHeight As Float = tmpString.MeasureHeight(fo)
For Each s As String In str
number = s.MeasureWidth(fo)/LbWidth + 1
height = height + number*fontHeight
Next
Return height + fontHeight
End Sub