Pagecontrol mit Imagelist und VCL Styles

**Rainer Wolff**

Ich wollte grad auch mal mein Programm mit den schönen Styles verzieren, bin aber schnell gestolpert.

Ich habe ein Pagecontrol mit mehreren Tabs und einer Imagelist mit zwei Grafiken (rote und blaue Lampe). Die Lampen werden auf allen Tabs angezeigt und dynamisch umgeschaltet (ImageIndex des Tabsheet).

Sobald ich einen Style aktiviere, hängen meine Lampen auf halbmast (Siehe Anhang). Wenn ich irgendwelche zusätzlichen Dummy-Grafiken in die Imagelist einbaue (soviele, wie Tabsheets vorhanden sind), passt die Anzeige wieder.

Hat jemand schon einen Bugfix dafür?

**Uwe Raabe**

Beispielprojekt?

**Rainer Wolff**

Ok, hier ein einfaches Beispiel, eine Imagelist mit zwei Bitmaps, eine mit Vieren. Mit Windows-Default ist alles gut.

Compiliert mit Seattle (incl. Hotfix), mit Berlin siehts aber genauso aus

**Der schöne Günther**

Gutes Beispiel zum Reproduzieren

Warum das ist so ist erschließt sich mir allerdings auch nicht...
(Bei mir auch nachvollziehbar)

**Uwe Raabe**

Ist ein Bug in TTabControlStyleHook . Kannst du bitte einen QP-Report mit deinem Beispielcode aufmachen. Ich werde dann versuchen, jemanden darauf anzusetzen.

**Uwe Raabe**

Ach ja: Als Workaround muss die ImageList mindestens so viele Einträge haben wie das PageControl TabSheets hat.

**Uwe Raabe**

Hat auch schon jemand anderes entdeckt:

https://quality.embarcadero.com/browse/RSP-14732

Pagecontrol mit Imagelist und VCL Styles

Pagecontrol mit Imagelist und VCL Styles

AW: Pagecontrol mit Imagelist und VCL Styles

AW: Pagecontrol mit Imagelist und VCL Styles

AW: Pagecontrol mit Imagelist und VCL Styles

AW: Pagecontrol mit Imagelist und VCL Styles

AW: Pagecontrol mit Imagelist und VCL Styles

AW: Pagecontrol mit Imagelist und VCL Styles

Forumregeln

Uwe Raabe Registriert seit: 20. Jan 2006 Ort: Lübbecke 10.995 Beiträge Delphi 12 Athens	#2 AW: Pagecontrol mit Imagelist und VCL Styles 25. Sep 2017, 16:34 Beispielprojekt? Uwe Raabe Certified Delphi Master Developer Embarcadero MVP Blog: The Art of Delphi Programming
	Zitat

Der schöne Günther Registriert seit: 6. Mär 2013 6.110 Beiträge Delphi 10 Seattle Enterprise	#4 AW: Pagecontrol mit Imagelist und VCL Styles 25. Sep 2017, 18:44 Gutes Beispiel zum Reproduzieren Warum das ist so ist erschließt sich mir allerdings auch nicht... (Bei mir auch nachvollziehbar)
	Zitat

Uwe Raabe Registriert seit: 20. Jan 2006 Ort: Lübbecke 10.995 Beiträge Delphi 12 Athens	#5 AW: Pagecontrol mit Imagelist und VCL Styles 25. Sep 2017, 19:05 Ist ein Bug in TTabControlStyleHook . Kannst du bitte einen QP-Report mit deinem Beispielcode aufmachen. Ich werde dann versuchen, jemanden darauf anzusetzen. Uwe Raabe Certified Delphi Master Developer Embarcadero MVP Blog: The Art of Delphi Programming
	Zitat

Uwe Raabe Registriert seit: 20. Jan 2006 Ort: Lübbecke 10.995 Beiträge Delphi 12 Athens	#6 AW: Pagecontrol mit Imagelist und VCL Styles 25. Sep 2017, 20:52 Ach ja: Als Workaround muss die ImageList mindestens so viele Einträge haben wie das PageControl TabSheets hat. Uwe Raabe Certified Delphi Master Developer Embarcadero MVP Blog: The Art of Delphi Programming
	Zitat

Uwe Raabe Registriert seit: 20. Jan 2006 Ort: Lübbecke 10.995 Beiträge Delphi 12 Athens	#7 AW: Pagecontrol mit Imagelist und VCL Styles 26. Sep 2017, 09:36 Hat auch schon jemand anderes entdeckt: https://quality.embarcadero.com/browse/RSP-14732 Uwe Raabe Certified Delphi Master Developer Embarcadero MVP Blog: The Art of Delphi Programming
	Zitat