esta rutina la hice hace tiempo se trata:
restas los componentes RGB del pixel, para ver si ha cambiado, lo mejor es que pongas una variable que indique la tolerancia es decir desde cuando consideras que ha cambiado un pixel (util si hay imagenes de video) ya que a lo mejor visualmente no cambia practicamente nada y te ahorras procesado:
algo asi :
Código Delphi
[-]
if Abs( imagen1.pixel (x,y).red - imagen2.pixel (x,y).red) > tolerancia
and
Abs( imagen1.pixel (x,y).green - imagen2.pixel (x,y).green) > tolerancia
and
Abs( imagen1.pixel (x,y).blue - imagen2.pixel (x,y).blue) > tolerancia
then =>>>>> ha cambiado el pixel !!!
tolerancia irá de 1 a 255
Un consejo no utilices canvas.pixel, ya que todo irá superlento, utiliza
bitmap.scanline => accedes el doble de rápido.