gr32 | Eine Farbe als Transparent markieren

[SirThornberry]

also die Zeile kannst du schonmal weg lassen:
TransparentColor := TransparentColor; Oder besser: wähle andere Variablennamen bzw. setze "Self." vor den entsprechenden teil.
Das ist übrigens genau die Stelle woran es bei dir scheitert.
Self.TransparentColor
ist per Default clBlack. Daher funktioniert es wenn es schwarz ist (weil da nichts geändert werden muss). Sobald aber eine andere Farbe verwendet wird geht es nicht weil du das Self.TransparentColor nie neu setzt.
Letztendlich sagst du mit der obigen Anweisung also "Farbparameter = Farbparameter" aber du willst eigentlich sagen "Form.Eigenschaft = Farbparameter"

Wie bereits gesagt. Ordentliche Variablenbenennung wählen so das man auch weiß ob die Variable eine lokale, ein Argument, ein Member etc. ist und im Idealfall zur Übersichtlichkeit "Self." vorranstellen wenn es um ein Member geht.