How Many Lines will Display

[JEHMayo]

I'm trying to figure out how many lines will display in a multiline textbox control. I've attempted to calculate it by using the GetHeight method of the textbox's Font object divided into the Height property of the textbox's ClientRectangle property. When I size the textbox to over 20 lines, the calculation doesn't work. It seems that the height actually used for each line in the textbox is a little more than what the font's GetHeight returns. I've also tried simply using the Height property of the font in the calculation. No luck there, either.

 

' My orginal code is like this:

Dim cFont As Font = txtBox.Font

Dim lineHeight As Single = cFont.GetHeight(txtBox.CreateGraphics())

Dim boxHeight As Single = txtBox.ClientRectangle.Height

Dim maxLinesVisible As Decimal = boxHeight / lineHeight

 

result is Decimal.Floor(maxLinesVisible)

 

Is there some sort of metric that measures the height actually used for some spacing between the lines or something else???? :confused:

[Nerseus]

Try MeasureString (part of the Graphics object), which returns a SizeF object with the width and height.

 

-Nerseus

[JEHMayo]

You nailed it dead on:

 

Dim g As Graphics = txtBox.CreateGraphics()

Dim sf As SizeF = g.MeasureString(sLine, cFont, txtBox.Width)

 

Then use sf.Height in the calculation.

 

Thanks 1,000,000!:)