PageControl - TabRect setzen

[Balu der Bär]

Nochmal wegen meinem Kampf mit dem PageControl: :roll:

Mittels

Delphi-Quellcode:

PageControl1.TabRect(0)

kann ich das TRect eines Tabreiters auslesen. Bloß wie kann ich dieses TabRect setze bzw. verändern? Im konkreten Fall geht es darum einen Tabreitern einfach etwas breiter zu machen. Ich habe keine Möglichkeit gefunden dies zu tun. :-(

P.S.: Ja ich weiß ich könnte die Caption des Tabs mit Leerzeichen auffüllen damit er breiter wird, aber das kann doch nicht die einzigste Möglichkeit sein, oder?

[marabu]

Hallo Pierre,

die Komponente TPageControl kapselt ein windows common control. Die Tabs können fixed width (TabWidth > 0) sein oder werden automatisch (TabWidth = 0) dimensioniert. Willst du bei einem einzigen Tab die Weite verändern oder möchtest du generell breitere Tabs haben?

Grüße vom marabu

[Balu der Bär]

Moin marabu,

alle Tabs sollen etwas breiter werden.

Edit: TabWidth kann ich aber nicht nehmen, da die Größe jedes Tabreiters unterschiedlich ist. Siehe: hier,
ich möchte jeden Tab ein paar Pixel breiter machen um noch den Button daneben platzieren zu können.

:gruebel:

[marabu]

Hallo Pierre,

inzwischen habe ich deinen anderen thread auch entdeckt und weiß um was es geht. Das tab control, welches von TPageControl gekapselt wird, ist noch nicht der große Wurf. Du kannst zwar auf OwnerDraw = True umschalten, aber damit werden fixed size tabs vorgeschrieben. Willst du varying size tabs, so wird die tab size alleine durch das optionale Icon und die Caption festgelegt. WM_MEASUREITEM wird leider nur bei TCS_OWNERDRAWFIXED verschickt und dann auch nur einmal - wegen fixed size.

Eine feste Anzahl spaces in der Caption ist wohl derzeit der einzige funktionierende Weg, um mehr Platz für die tab captions zu reservieren. Der Button, den du am rechten Rand einzeichnest, wird aber sicher ständig übermalt, wenn die Caption neu gezeichnet wird.

BTW: Zwei Icons pro Tab finde ich nicht so prickelnd. Du könntest den Button als nachgestelltes Icon festlegen.

Grüße

[Balu der Bär]

Moin marabu,

ok danke für deine Mühe. :-)

Zitat:

BTW: Zwei Icons pro Tab finde ich nicht so prickelnd. Du könntest den Button als nachgestelltes Icon festlegen.

Was genau meinst du mit zwei Icons pro Tab? :gruebel:

[marabu]

Ich hatte dieses Bild (tabbed browser) vor Augen - links FavIcon und rechts CloseButton.

[Balu der Bär]

Nein marabu, bei mir sieht das z.B. so aus: http://www.delphipraxis.net/download.php?id=22754

;)