Mal ne frage Delphi beziefisch:

Ich habe 3 Farbwerte (r,g,b) einzeln jeweils in nem Byte gespeichert. Wie mache ich daraus jetzt die Mischfarbe im Integer (Hexdezimal zb $7F7F7F)

Ich habe zwar eine lösung aber die ist ziemlich unschön