listview text gets cut off

[Whatupdoc]

do you know when you enter alot of text in a listview, it gets cut off. I have the code to auto resize it to expand the width, but i dont want that. i want to do is expand it vertically (height-wise) so it wont get cut off. anyone know how to do this?

[messup000]

you mean like a vertical scroll bar???

[Whatupdoc]

i dont want a scroll bar, inside the listivew, there are rows and columns of text, and if you enter too much text, it will get cut off. what i want to do is expand it (height-wise). it will look ugly with a scroll bar

[dglienna]

Could you use a MsFlexgrid instead? You can set the .RowHeight property of each individual row.

[Whatupdoc]

hmmm, im already using listview. i already did alot of work with the listview, is it even possible to do it with the listview? if not, i will probably switch

[RobDog888]

You could probably change the height for a single row but you would have to subclass the lvw and change its height that way.

ListView1.ListItems(1).Height

The height is read only but it may be possible while subclassing.

[Whatupdoc]

i dont even know what subclassing is
im not that good in vb

[dglienna]

A flexgrid is like a spreadsheet. Very versatile. I would only use a listview if I needed to expand and collapse rows, and now that I learned that you can do the same with a MSHFlexgrid, I don't know if I would unless the data didn't come from a database.

[RobDog888]

Subclassing is where you go a bit lower into vb programming and hook into the messagestream that receives and sends window messages from windows to and from your form. Probably too much work for this. Perhaps its best to try a duplicate project and change the listview to a grid.

[Whatupdoc]

yea im trying to use a grid now, and i did that height the .RowHeight = blah, and the text still gets cut off. of course the height is what i want, but it get cuts off horitonzally. anyone know how to fix this?

[RobDog888]

I think there is a .wordwrap property.

[Whatupdoc]

yup, there is, but it isnt working. text is still cut off

[RobDog888]

Hmm, maybe your going to have to manually place line breaks to make it wrap. Going to be a pain to identify where to place them.

I know the .wordwrap in a listview only works on a listview that is in Large Icon View.

[Whatupdoc]

manually placing line breaks is okay, since i dont have that much info. how would i do that?

[dglienna]

I set .wordwrap=true, and then used this.

.TextMatrix(2, 1) = "*" & vbCrLf & "1"

of course, you have to make the row height large enough for two lines.

[RobDog888]

Before you add the item or subitem you will manipulate the string with the Mid$ and Instr functions, for ex., to break the string where you specify. Tehn with parts of your string you will reatach them but place the vbNewline inbetween.

MsgBox "Testing" & vbNewline & "Next line." 'for ex.

[Whatupdoc]

ahhhh... you mean like that... thanks alot. i never thought of that and it works! one more question, is it possible to color the column of text like in listview?

[RobDog888]

Yes, its in there.

Option Explicit
 
Private Sub Form_Load()
    MSFlexGrid1.Row = 1
    MSFlexGrid1.Col = 1
    MSFlexGrid1.TextMatrix(1, 1) = "Test"
    MSFlexGrid1.CellForeColor = 255 ' = "[color=red]Test[/color]"
End Sub

[Whatupdoc]

nice thank you

[dglienna]

I could only get it to change the color of the first cell in the grid. Maybe you have to move explicitly to a cell to change the color of the cell. Filling with textmatrix() doesn't do it.

[RobDog888]

Yes, correct David. Change the .Row and .Col to the dell you want to change. Then change it and move to the next.

[MartinLiss]

In case you ever want to use the listview this seems to work.

ListView1.Height = (ListView1.ListItems.Count + 2) * ListView1.ListItems(1).Height