请教Listview中, 怎样使列标题的图标显示在文字的右侧?

[smoked]

加载了图标默认显示在标题文字的左侧, 没找到相关的属性, 不知如何设置,
请大家指点, 谢谢.

[daisy8675]

又不真实的网格

换控件，spread等

[Sandrer]

需要用API建立或者更改才行~

Private Type LVCOLUMN
    iMask       As Long
    fmt         As Long
    lx          As Long
    pszText     As String
    cchTextMax  As Long
    iSubItem    As Long
    iImage      As Long
    iOrder      As Long
End Type

在现有的ListView中（已包含列头），使用SendMessage发送LVM_GETCOLUMNA消息以获得列标头

Const LVM_FIRST = &H1000
Const LVM_GETCOLUMNA = (LVM_FIRST + 25)
Const LVM_SETCOLUMNA = (LVM_FIRST + 26)

Const LVCF_FMT = &H1

Const LVCFMT_BITMAP_ON_RIGHT = &H1000

Dim Lvc As LVCOLUMN
Lvc.iMask = LVCF_FMT
Call SendMessage(ListView1.hWnd, LVM_GETCOLUMNA, 0, Lvc)
If (Lvc.fmt And LVCFMT_BITMAP_ON_RIGHT) <> LVCFMT_BITMAP_ON_RIGHT Then
    Lvc.fmt = Lvc.fmt Or LVCFMT_BITMAP_ON_RIGHT
    Call SendMessage(ListView1.hWnd, LVM_SETCOLUMNA, 0, Lvc)
End If

大致就这样，不过我没测试过。
我忘记了类型中的iSubItem怎么赋值了~