Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Hellere oder dunklere Farbe ableiten (https://www.delphipraxis.net/142567-hellere-oder-dunklere-farbe-ableiten.html)

Muchacho 30. Okt 2009 12:22


Hellere oder dunklere Farbe ableiten
 
Hallo

Wie kann ich von einer beliebigen Farbe eine etwas hellere bzw. dunklere Farbe ableiten (ausrechnen)?

Beispiel:

Ich wähle eine rote Farbe und eine Komponente (z.B. Edit-Feld) erhält daraufhin hell-rote und ein anderes Edit-Feld dunkler-rote Farbe.

Wähle ich z.B. eine grüne Farbe dann passiert im gleichem Verhältnis! wie vorher:

Ein Edit-Feld erhält daraufhin hell- grüne, und ein anderer Edit-Feld dunkel- grüne Farbe.

Wichtig dabei ist, dass die Veränderung der Farben immer in gleichem Verhältnis zu der Grund-Farbe (also diese die ich an diese Prozedur übergebe) passiert.

Gruß

Muchacho

stahli 30. Okt 2009 12:55

Re: Hellere oder dunklere Farbe ableiten
 
guckst Du hier :-)

Namenloser 30. Okt 2009 12:57

Re: Hellere oder dunklere Farbe ableiten
 
Delphi-Quellcode:
Label2.Color := RGB(round(GetRValue(Label1.Color)*0.75),
                    round(GetGValue(Label1.Color)*0.75),
                    round(GetBValue(Label1.Color)*0.75));
Meinst du sowas?

hadschi92 30. Okt 2009 12:58

Re: Hellere oder dunklere Farbe ableiten
 
Mithilfe des HSV-Farbraumes geht das ganz einfach. Du musst zuerst deine RGB Werte in HSV Werte umrechnen, dann kannst du mit S die Sättigung und mit V die Helligkeit verändern und schließlich das Ganze wieder in RGB zurückrechnen.

Mit GIMP kannst du super ausprobieren, was passiert wenn du den H, S oder V-Wert einzeln änderst.

Muchacho 30. Okt 2009 13:25

Re: Hellere oder dunklere Farbe ableiten
 
Viele Dank ! :-D

Das hat mir sehr geholfen!

Muchacho


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:41 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz