Спасибо ART.
я зделал так:
//--------------------------
begin
Image1.Canvas.Pixels[50,50]:= clred;
if (Image1.canvas.pixels[50,50] = clred) and (image1.Picture.Bitmap.Canvas.Pixels[50,50]= clblack) then
begin
image1.Canvas.Brush.Color:=clred;
image1.Canvas.Ellipse(50,50,10,20);
end
else
image1.Canvas.Brush.Color:=clBlue;
image1.Canvas.Ellipse(50,50,10,20);
end;
//------------------------------
Но как теперь зделать так чтобы на Image1 не рисовалась точка красным цветом, а запоминаля её цвет (не знаю можно ли так зделать - бредовая наверное идея).
|