[xkor]

как вариант, создать компонент TImage затем загрузить в него изображение и там уже цвет пиксела легко узнать...

хех, пока писал, квак уже ответил, тока он написал как задать цвет а не как его считать)
image1.Canvas.Pixels[X,Y]:=clRed; надо заменить на color:=image1.Canvas.Pixels[X,Y];