Sorry, mein Kommentar war in die falsche Zeile gerutscht.
Ich meinte: Pixel = Pixel1 andersherum, du willst ja die single in eine Byte quetschen. Ob das so geht musst du mal sehen. Single benutzen bringt dir immer eine Menge Zusatzcode in dein Programm. Und du brauchst das hier nicht wirklich. Du könntest auch mit 15 multiplizieren und dann shiften (durch 2 teilen).

Gruß

Rolf