Public Sub ULV_DBQ_RowLayoutCreator(LayoutName As String, CellPanel As Panel, CellIndex As Byte)
Dim lblText As Label
lblText.Initialize("")
lblText.Color = Colors.Transparent
lblText.TextColor = Colors.Black
lblText.TextSize = 16
lblText.Typeface = Typeface.DEFAULT
lblText.Gravity = Gravity.CENTER_VERTICAL
CellPanel.AddView(lblText, 10dip, 5dip, CellPanel.Width - 20dip, CellPanel.Height - 10dip)
'Scale.ScaleViewDS(CellPanel) '- works wrong :(
'Scale.ScaleViewDS(lblText) '- works wrong :(
End Sub