0

我已经附上了一些关于这个问题的示例代码。我用两行和一个位图创建了一个列表视图。我禁用了第二个标签,所以我只有图像和一个标签。我想将文本垂直居中,似乎无法弄清楚!

Sub Globals
Dim listview1 As ListView
Dim bitmap1 As Bitmap
End Sub

Sub Activity_Create(FirstTime As Boolean)

bitmap1.Initialize(File.DirAssets, "fldricon.gif")
Listview1.Initialize("listview1")
ListView1.TwoLinesLayout.Label.TextSize=18
ListView1.TwoLinesLayout.ItemHeight=60

ListView1.TwoLinesAndBitmap.SecondLabel.Visible=False
ListView1.TwoLinesAndBitmap.SecondLabel.Enabled=False
ListView1.TwoLinesAndBitmap.SecondLabel.RemoveView
Listview1.TwoLinesAndBitmap.Label.Gravity=Gravity.CENTER_VERTICAL

activity.AddView(listview1,0,0,50%x,100%y)

Listview1.AddTwoLinesAndBitmap("some string","",bitmap1)

End Sub

如您所见,我已禁用第二个标签,但第一个标签不会垂直居中。任何和所有的帮助将不胜感激!谢谢

4

1 回答 1

0

两个提示:

  1. 指定屏幕尺寸时使用倾角单位:

    ListView1.TwoLinesLayout.ItemHeight=60dip

  2. 将标签颜色设置为非黑色以查看标签的布局。然后,您将看到隐藏第二个标签时标签的大小不会改变。

解决方案是:

ListView1.TwoLinesAndBitmap.Label.Height = ListView1.TwoLinesLayout.ItemHeight
于 2011-10-25T08:33:36.750 回答