Thema: Delphi Näherung zu einer Farbe

Einzelnen Beitrag anzeigen

Benutzerbild von Jelly
Jelly

Registriert seit: 11. Apr 2003
Ort: Moestroff (Luxemburg)
3.741 Beiträge
 
Delphi 2007 Professional
 
#2

Re: Näherung zu einer Farbe

  Alt 17. Mär 2007, 19:48
Die Farben liegen z.B. als RBG vor. In Delphi gibts dafür Funktionen, um die 3 rot-blau-grün Werte einer Farbe aufzusplitten. z.b. ist:

Rot = (255,0,0)
Grau = (128,128,128)

Du willst von einer Farbe in die nächste "faden". Gib dir dafür eine Schrittzahl z an (z.B. z=10), und errechne für jeden Kanal die Schrittweite mit

Delphi-Quellcode:
r := (255-128) / z ;
g := (0-128) / z ;
b := (0-128) / z ;
Von Grau nach rot

Delphi-Quellcode:
for i := 0 to z do begin
   r2 := r_grau + i*r ;
   g2 := g_grau + i*g ;
   b2 := b_grau + i*b ;
end ;
So in etwas...
  Mit Zitat antworten Zitat