BetterListView... невозможно разместить значок и имя файла в одной строке

Question

Я кодирую в vb.net на Windows 10 (не уверен, важна ли ОС или нет). Я хотел бы задать вопрос о BetterListView Express.

В мой список я помещаю значок, а затем имя файла. Проблема в том, что имя файла далеко вправо. Кто-нибудь знает, как получить имя файла справа от значка?

Вот фрагмент:

exeIcon = Drawing.Icon.ExtractAssociatedIcon(exePath)

imgList.ImageSize = New Size(16, 16)

With imgList.Images
    .Add(exePath, exeIcon)
    .Add(imgList.Images(0))
End With

With blist.Items
    .Add(imgList.Images(0))
    .Add(p.ProcessName)
End With

Из кода я могу сказать, что имя процесса будет в отдельной строке. Я просто не знаю, как поставить их на одной линии. Любая помощь приветствуется!

Answer 1

Я скачал их образец отсюда и открыл проект vb.

В этом файле вы сможете найти все необходимые образцы.

Вот соответствующий фрагмент:

    Dim itemCentered = New BetterListViewItem() With {
        .Group = listView.Groups(0), _
        .Text = "Centered" _
    }

    itemCentered.SubItems.Add(New BetterListViewSubItem() With {
                              .AlignHorizontalImage = BetterListViewImageAlignmentHorizontal.OverlayCenter, _
                              .Image = imageItem _
                              })

    listView.Items.AddRange(New BetterListViewItem() {
    itemCentered,
    New BetterListViewItem("Image before text") With { _
        .Group = listView.Groups(0), _
        .Image = imageItem _
    }, New BetterListViewItem("Image after text") With { _
        .AlignHorizontalImage = BetterListViewImageAlignmentHorizontal.AfterTextCenter, _
        .AlignVerticalImage = BetterListViewImageAlignmentVertical.Middle, _
        .Group = listView.Groups(0), _
        .Image = imageItem _
    }, New BetterListViewItem("Top left") With { _
        .AlignHorizontal = TextAlignmentHorizontal.Left, _
        .AlignVertical = TextAlignmentVertical.Top, _
        .Group = listView.Groups(1), _
        .Image = imageItem _
    }, New BetterListViewItem("Middle center") With { _
        .AlignHorizontal = TextAlignmentHorizontal.Center, _
        .AlignVertical = TextAlignmentVertical.Middle, _
        .Group = listView.Groups(1), _
        .Image = imageItem _
    }, New BetterListViewItem("Bottom Right") With { _
        .AlignHorizontal = TextAlignmentHorizontal.Right, _
        .AlignVertical = TextAlignmentVertical.Bottom, _
        .Group = listView.Groups(1), _
        .Image = imageItem _
    }})

Особенно обратите внимание, как Image свойство устанавливается.

New BetterListViewItem("Top left") With { _
    .AlignHorizontal = TextAlignmentHorizontal.Left, _
    .AlignVertical = TextAlignmentVertical.Top, _
    .Group = listView.Groups(1), _
    .Image = imageItem _
}