Transparentcolor rot wird bei dem Bild nicht funktionieren, weil in dem Bild nichts rot (= clRed) ist, die überwiegend vorkommende Farbe ist $005334FE.
Ich habe den Code-Teil abgeändert.
b.TransparentColor := $005334FE;
Leider bleibt das Ergebnis unverändert.