Farben umkehren

[capo]

hi...
wie kann ich alle farben einer form umkehren.
aus schwarz mach weiss und umgekehrt.
gruss vom capo

[Mackhack]

Guckst du mal nach Farbe invertieren oder mit Farbe invertieren. Dann kommst du sicherlich zu diesem DP Beitrag hier

[Reinhard Kern]

Zitat von capo:

hi...
wie kann ich alle farben einer form umkehren.
aus schwarz mach weiss und umgekehrt.
gruss vom capo

Hallo,

wenn es eine brauchbare Definition für "eine Farbe umkehren" gibt, dann Ru := 255 - R usw. wie schon beschrieben.

ALLE Farben in einer Form umzukehren wird allerdings sehr mühsam - ich würde die VCL ändern. In der Hierarchie müsste TControl die erste Klasse mit der Eigenschaft Color sein, also sollte man da die Eigenschaft ColorInversed dazufügen und den constructor Create so überschreiben, dass diese Eigenschaft vom Parent übernommen wird und wenn gesetzt die Eigenschaft Color durch die inverse Farbe ersetzt wird.

Mit Bordmitteln wird das nicht gehen, weil z.B. ein TButton kein OnCreate-Ereignis hat. Um die Farbe zu manipulieren, müsste man daher Create überschreiben, also eine geänderte Komponente anlegen für alle in der Form vorkommenden Komponenten. Das ist mehr Arbeit und fehleranfälliger als meine erste Methode.

Gruss Reinhard

[capo]

danke...werd das nun irgendwie hinkriegen.
gruss capo