[Rslvd:Thnx 2 Mendhak,Crptcblade] How do I find the Height of the Titlebar of a Form?

[NotLKH]

When placing controls dynamically on a form, I'd like to resize the form to be a certain amount more than the bottom edge of the bottom control placed on the form. However, its the same old problem, the vertical position of a control does not include the height of the titlebar of the form, so saying something like:

Me.Size = New Size(New Point(Me.Width, mybuttons(255).Bottom + mybuttons(255).Height))

still cuts off the control array.


-Lou

[mendhak]

I think it's a constant of 25. But I don't know what it'd be if you had XP styles in there.

[crptcblade]

Try SystemInformation.CaptionHeight

[mendhak]

Originally posted by crptcblade
Try SystemInformation.CaptionHeight

I learn something new every day.

[crptcblade]

Not me. I just forget stuff I used to know.

[NotLKH]

Originally posted by mendhak
I think it's a constant of 25. But I don't know what it'd be if you had XP styles in there.

Nope! No XP Styles. {Hmmm, Now you've got me thinking about how to do that.}

However, it seems that 25 is a good guesstimate.

I don't know why, but you inspired me to check out the "hidden" area of the forms code, came across "clientsize", and so I added the following to my load event:

MyExtra = Me.Size.Height - Me.ClientSize.Height

and it turns out Msgboxing MyExtra reveals MyExtra = 27.

Which perfectly adjusts my forms size to just where I want it.


-Thanks
-Lou

[NotLKH]

Originally posted by crptcblade
Try SystemInformation.CaptionHeight

Hmmm, it returns 19, a little too small compared to the 27 that MyExtra returns. Must be the height of the Hypothetical Label in the titlebar.

I'll just file this little tidbit away under "Things that might be handy."

now, lets see what other nifty little items are in this SystemInformation Dot Popup


-Lou

[mendhak]

Originally posted by NotLKH

However, it seems that 25 is a good guesstimate.

See that, Joe!! I win!

[mendhak]

Originally posted by NotLKH
Nope! No XP Styles. {Hmmm, Now you've got me thinking about how to do that.}

http://searchvb.techtarget.com/vsnet...293674,00.html

[pax]

Hi.

Instead of trying to calculate the forms total height, you can just set the ClientSize.

So if you need a clientheight of e.g. 400, you would normally set it to about 425.

But instead just set Me.ClientSize=New Size(Me.Width,400)
Then VB will automatically set the "true" form size accordingly.