关于ListView的ColumnHeader Icon问题

[gump2000]

设置了columnheader的icon以后，只想让图标只在
一列显示，像Explore一样。

但是，没有图标的Header业预留了空间给Icon，看起来
好难看啊。

如何解决啊？

[gump2000]

------------------------------------------
|<ICON>COL1 |<EMPTY>COL2 |<EMPTY>COL3
------------------------------------------

我只想显示COL1的ICON，成功了，但是COL2&COl3
上却有预留了ICON的空间，好难看

如何解决？

[gump2000]

upup

[uguess]

没有发现你说的情况。Win2000+VB6(SP5)。

要不，吧你的代码寄给我，我给你看看。

[gump2000]

很简单的

Listview有3列，全部Left靠齐

代码就是这样的了

设置了列标头图标->ImageLV

listview1.columnheaders(1).icon=1

结果就是上面那样了。:(

[gump2000]

忘记说，我也是Win2000+vb6(sp5)

[lily0000000]

listview1.add 1,,,,图标1
listview1.add i,,,,, 不是第一列就不设置图标

[gump2000]

错了，错了

这样的时候出错

for each c in listview1.columnheads
c.icon=0 //这导致的
if c.text="col1" then c.icon=1
next

该如何去掉=0时候的空图标啊？

[gump2000]

因为会多列排序，所以图标不是固定在某列的

简单的问就是如何去掉一个列头的图标，而且不产生空白

[gump2000]

upup

[uguess]

Dim c As ColumnHeader
ListView1.ColumnHeaderIcons = ImageList1
For Each c In ListView1.ColumnHeaders
If c.Text = "常规" Then
c.Icon = 1
Else
c.Icon = 0
End If
Next
用上面的代码时也出现了你说的问题。我没有出问题，是通过直接在设计时设置，以及通过以下的代码，就不会出现这个问题。

[dbcontrols]

用Imagedit.exe做一个透明的图标。这个工具在安装盘里面，使用很简单。

[QQ576006]

listview1.columnheader.add ,,,col1,icon1
listview1.columnheader.add ,,,col2
listview1.columnheader.add ,,,col3
...

[gump2000]

to dbcontrols:

空白的意思不是说： 白色的空白

而是ColumnHeader的Text前面多了一块空的

[gump2000]

to uguess:

我没有出问题，是通过直接在设计时设置，以及通过以下的代码，就不会出现这个问题。

不是很明白...:(

[uguess]

不好意思，代码也有问题。不过肯定的一点，设计时，即通过ListView的属性页指定，是没有问题的。

[qkaizhou]

没有办法，图标是可以随意加在哪里，但只要有一个Item加了，其他Item就会出现空格！

[gump2000]

总不会是这样实现的吧？？？

先全部删除columnheader再添加？？？？？