CENTER icon in listsubitem listview

[sal21]

I isnert icon with:

....
.ListItems(RM).SubItems(D) = ""
.ListItems(RM).ListSubItems(D).ReportIcon = 1
....

the icon is allined to the left, possible to align to the center in subitem?

 

[strongm]

Not with the standard VB6 ListView, I'm afraid

I refer you to previous answers concerning making the VB6 ListView control do things it is not designed to do: OwnerDraw. And you have been provided links and examples of doing that.

 

[sal21]

hi strongm,
but is very strange....
i think.
insert a wingding char in listsubitem, in bold and read color
I need in listsubitem a simple and little bullet(Dot) in red.
in this case the column is just set to Center, wath you think about?

 

[strongm]

Setting column alignment (and note that you cannot set an y alignment of the first column except left-align) only affects text - so if you have a wingding character then sure you would superficially appear to have a solution. However, you can only globally set the font for a listview (again, unless you go to ownerdraws)...

 

[sal21]

ownerdraws???

 

[strongm]

Yes, as previously mentioned in your thread222-1803733, and thread222-1809066. And thoroughly demonstrated with working code in your thread222-1803482.