061 - 检测字符高度与手机界面的高度SU.MeasureMultilineTextHeight

MM0759.COM

061 - 检测字符高度与手机界面的高度SU.MeasureMultilineTextHeight - 文章首页→返回版区

■标题:061 - 检测字符高度与手机界面的高度SU.MeasureMultilineTextHeight

■作者:IPSC [2025/3/26 18:45:52]
Sub Activity_Create(FirstTime As Boolean)

'Do not forget to load the layout file created with the visual designer. For example:

'Activity.LoadLayout("Layout1")

Dim Label1 As Label

Label1.Initialize("")

Label1.Text = "随便写几行文字串, 检测这个标签在手机窗体界面占用的高度,比较一下看看高度" _

& "1111111111111111111111111111111111111111111111111111111111111111" _

& "22222222222222222222222222222222222222222222222222222222222222222222" _

& "3333333333333333333333333333333333333333333333333333333333333333333333" _

& "4444444444444444444444444444444444444444444444444444444444" _

& "555555555555555555555555555555555555555555555555555555555555555555" _

& "66666666666666666666666"

Label1.TextSize = 20

Activity.AddView(Label1, 10dip, 10dip, 200dip, 30dip)

Dim SU As StringUtils

Label1.Height = SU.MeasureMultilineTextHeight(Label1, Label1.Text)

Log(Label1.Height & "," & Activity.HEIGHT) '在IDE界面右边您将可以看到总高度与手机界面的高度

End Sub

【回复/版区/上篇/下篇/发贴/仅文字/HTML】

【倒序/最近21条回复】(暂无)

(查看完整版网页)

短讯|首页|登录|算法|电脑版 .
DK MiniBBS Plus v2.0
mm0759.com
42 毫秒 .