Как определить цвет пикслия в изображении ??

[Xsires]

Canvas.Pixels[i,s] - соответствует цвету пикселя , но при выводе переменной


X:=bmp.Canvas.Pixels[1054,476];
Edit1.Text:=IntToStr(x-);


получается значение в десятичной системе , пробовал это значение переворачивать в шеснадцатеричную все равно выводимое значение пикселя не совпадает настоящиму цвету цвету.
что нужно сделать чтобы узнать цвет конкретного пикселя ?????

[HellMercenariess]

Если нужно точно придется разложить на R G B

function GetColorXY(Graphic: TGraphic; Color: TColor; var X, Y: Integer): Boolean;
var
Bmp: TBitmap;
i, j: Integer;
Pixel, CmpColor: Cardinal;
Scan: Pointer;
R, G, B: Byte;
begin
Result:=false;
CmpColor:=ColorToRGB(Color);
Bmp:=TBitmap.Create;
try
Bmp.Assign(Graphic);
Bmp.PixelFormat:=pf24bit;
for i:=0 to Bmp.Height - 1 do begin
Scan:=Bmp.ScanLine[i];
for j:=0 to Bmp.Width - 1 do begin
Pixel:=PCardinal(Integer(Scan) + j*3)^;
R:=GetBValue(Pixel);
G:=GetGValue(Pixel);
B:=GetRValue(Pixel);
if RGB(R, G, B) = CmpColor then begin
Result:=true;
X:=j + 1;
Y:=i + 1;
Exit;
end;
end;
end;
finally
Bmp.Free;
end;
end;

Вот ещё по теме - http://www.programmersforum.ru/showthread.php?t=12362

[Xsires]

Спасибо больше помогло !