title image


Smiley Re: Mittelwert aus mehreren TColor-Werten bilden
Du musst doch nur die Werte für R G und B extrahieren und dann jeweils separat addieren. Die Summen teilst du durch die Anzahl der Einträge im Array und hast dann die Mittelwerte.

Die setzt du wieder zusammen und fertich.





for i := 0 to x do

begin

r := farbe and $FF;

g := (farbe shr 8) and $FF;

b := (farbe shr 16) and $FF;

summeRot := summeRot + r;

summeGrün := ..., genauso summeBlau

end;

und dann

r := summeRot div Anzahl Elemente;

g := ...

Mischfarbe := (b shl 16) + (g shl 8) + b;



Das ganze geht natürlich gegen ein mittleres Grau je mehr unterschiedliche Farben du hast.



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: