|
#1
|
|||
|
|||
вопрос по XOR
Всем доброго времени суток.
Нужно найти различия между 2 изображениями, делаю так Код:
var b1,b2,b3: TBitmap; x,y:word; .... for x:=1 to b3.Width do for y:=1 to b3.Height do b3.Canvas.Pixels[x,y]:=b1.Canvas.Pixels[x,y] xor b2.Canvas.Pixels[x,y]; .... Собственно, все "правильно", НО очень большое время выполнения кода. Можно ли как либо XORить "по быстрее", чем быстрее - тем лучше |
#2
|
||||
|
||||
метод через Pixels[x,y] это жутко медленно.
Используй bx.Scanline(i) - получишь указатель на массив байт (строка пикселей картинки). Один пиксель - 3 байта. jmp $ ; Happy End! The Cake Is A Lie. |