a := ((Buf[dx, dy] shr 24) and 256) - d
Code:
$AAbbggrr shr 24
$000000AA and $FF
$AA
wenn Du 256 verwendst - passt das nicht in ein Byte
Code:
$AAbbggrr shr 24
$000000AA and $100
$000
Grüße
Klaus
Ja sorry Klaus das ist nicht aus meinem Mist gewachsen.
Es ist so vom Original übernommen.
Werde mir das nochmal genauer ansehen.
gruss