Dim cnv As Canvas
Dim lbl As Label = ListView1.TwoLinesLayout.SecondLabel
cnv.Initialize(lbl)
Dim CanvasStringHeight As Float
CanvasStringHeight = cnv.MeasureStringHeight(Note, lbl.Typeface, lbl.TextSize)
Log("CanvasStringHeight = " & CanvasStringHeight)