Thema: Delphi Image einfärben

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.166 Beiträge
 
Delphi 12 Athens
 
#4

AW: Image einfärben

  Alt 15. Feb 2014, 01:11
Der Code macht aus dem Bild ein Grau-Abbild, aber gibt das nur als Rot-Kanal zurück.

- Trunc(B*0.11+G*0.59+R*0.3) = Grau, wie die Augen des Mensch die Farbkanäle in ihrer Helligkeit bewerten
- RGB(Gr, 0, 0) statt RGB(Gr, Gr, Gr) ... Gr = Grau


Du hast schon die einzelnen Farbkanäle R, G und B,
rechnest diese "einzeln" um
und dann kommen sie via RGB(R, G, B) wieder zusammen.

PS: Statt mit Prozenten, könnte man hier auch ganzzahlig mit 255, bzw. 256 und via * und div rechnen, da die Farbkanäle jeweils Werte von 0 bis 255 enthalten.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (15. Feb 2014 um 01:18 Uhr)
  Mit Zitat antworten Zitat