TPageControl tab height question

[walkesh]

Is there a way to get the height of the tabs shown in the TPageControl? I have TPageControl with numerous pages, and my tabs are shown on the top of the page control. I need to be able to determine what the height of the tab portion of the TPageControl is. The TabHeight Property in the designer is set to 0, so that means the the tabs size automatically. At run time, I would like to be able to determine the height of the tabs. Does anyone have any suggestions? I am using Delphi 2005.

 

[BobbaFet]

Cant you do something like:

tabheight = pagecontrol1.height - tabsheet1.height - tabsheet1.borderwidth;

That should pretty much be it.

BobbaFet

if not Programming = 'Severe Migraine' then
                       ShowMessage('Eureka!');