PageExtControl zeichnet manchmal Labels nicht [Berlin]

[SearchBot]

Hallo,

ich nutze seit Jahren die freie Komponente TPageExtControl, die man zB bei Torry bekommt. Der Autor scheint nicht erreichbar zu sein.

Ich habe seit Delphi Berlin das Problem (davor hatte ich Delphi XE), dass auf manchen Tabsheets die Labels nicht gezeichnet werden, auf anderen in der gleichen Anwendung aber schon.

Auffällig ist, daß wenn ich ein Label direkt auf dem TabSheet platziere, es eher nicht gezeichnet wird als wenn ich es in einer Groupbox habe, die auf dem Tabsheet liegt.
Und es gibt ein Ereignis, daß sie plötzlich doch gezeichnet werden.

Und es betrifft die auch Labels eines TLabeledEdit.
Bei einem TStaticLabel ist mir das noch nicht aufgefallen (ich benutze sie aber auch sehr selten, weil dieses nicht immer korrekt Autosize macht).

Dieses Verhalten habe ich nur zur Laufzeit ; im Designer ist es immer korrekt.

Ich weiß nicht, wie ich das Verhalten korrigieren kann.
Kennt das jemand oder hat dafür eine Lösung?

[himitsu]

TStaticText ist das "eigentliche" Windows-Control eines Labels in Windows. (eigenständiges Windows-Control)

TLabel ist "virtuelles" ein VCL-Konstrukt, welches sich irgendwie in seinen Parent hackt und auf dessen Canvas gezeichnet wird. (das wird bei dir wohl irgendwo hängen)
Mit einem TPanel (gern auch ohne Rahmen) oder eben der TGroupBox dazwischen, wird das Label nun auf Diesem gezeichnet und nicht mehr auf dem TPageExtControl-TabSheet.

TLabeledEdit ist ein TEdit, wo ein TLabel "daneben" plaziert wird.

mögliche Lösungen:
* rausfinden wie TLabel, TImage, TPaintBox und TShape das machen und es reparieren
* immer ein TPanel ohne Border und mit alClient als Erstes auf die TabSheets und dann den Rest da drauf
* ...

[hoika]

Hallo,
wie himitsu bereits sagte
Panel auf das Tabsheet, Alignment=alClient, Ränder ausschalten
alle Komponenten auf dieses Panel verschieben

[himitsu]

Zitat von hoika:

wie himitsu bereits sagte ...

Aaaaaber

Je nach Style klappt das mit den Farben nicht so ganz.
z.B. in WinXP hat das PageControl intern ne andere Hintergrundfarbe, aber TPanel erbt die nicht, trotz ParentColor=True

[SearchBot]

Hm...

...dann mache ich eben ein randloses Panel dazwischen. Ist dann zwar schwieriger, ans TabSheet zu kommen, aber viel schneller, als Komponenten zu debuggen...

Hatte gehofft, jemand hätte das vielleicht schon gefixt