TImageList GrayScaleFactor

[Der schöne Günther]

Ich update gerade ein Projekt von 10.0 Seattle auf 10.4.1 Sydney.

An der TImageList hat sich ja viel (zum Positiven) geändert, jedoch gibt es ein Problem das in 10.0 Seattle noch nicht existiert hat:

1. TImageList hat schöne PNGs mit Alpha-Kanal ("Farbtiefe 32 Bit")
2. TButton zeigt auf TImageList und ein Bild davon
3. TButton ist aber disabled

Wenn der Button disabled ist sieht es, ziemlich hässlich, so aus:


Wird der Button zur Laufzeit enabled sieht er normal aus, wird er wieder disabled, so wie auf dem Bild.

Ein Workaround ist, die (mal wieder) undokumentierte Eigenschaft TImageList.GrayscaleFactor auf einen anderen Wert als den Standardwert 0 zu setzen. Allerdings hat das zur Laufzeit keine Auswirkungen, man muss es auf dem Formular-Designer bzw. im Konstruktor machen. Dann sieht es auch im disabled-Zustand aus wie erwartet.

Nur: Ich kann doch nun nicht ernsthaft alle ImageLists im Projekt durchgehen und dort etwas setzen von dem mir noch nicht einmal jemand sagen kann was es genau tut. Gibt es eine andere Möglichkeit? Was übersehe ich?

[Uwe Raabe]

Hört sich irgendwie nach dem hier an: Different behaviour in 10.4.1 compared to previous version (10.3.3 and lower). Außer dem beschriebenen Workaround hilft vermutlich nur auf einen Fix zu warten.

[Der schöne Günther]

Danke, dann fühle ich mich nicht mehr ganz so alleine. Merkwürdig wie sowas nicht auffällt. Da ich weder Zeit noch Lust habe auf das nächste Update zu warten bleibt mir wahrscheinlich nichts anderes übrig als einen Workaround ganz oben in meiner Basisklasse TMeinFrame oder TMeinFormular einzubauen. Es sollte ja reichen

1. Entweder auf allen Buttons die DisabledImageList zu setzen
2. oder auf allen TImageList die Eigenschaft "GrayscaleFactor" zu setzen

[Uwe Raabe]

In einem Kommentar wird ein Workaround mit einem TButton-Interposer vorgeschlagen. Dann müsste man nur die uses-Anweisungen der betreffenden Units ergänzen.