Все равно никак не могу понять, в чем дело: не меняется цвет и все тут(. Куда только строчку с присвоением цвета не вставлял)
Код:
...
bm_ship.Assign(bm_orig);
bm_ship.PixelFormat:=pf32bit;
bm_ship.Canvas.Pen.Color:=clRed;
bm_ship.Canvas.MoveTo(ship_back.X,ship_back.Y);
bm_ship.Canvas.LineTo(ship_front.X,ship_front.Y);
bm_ship.Canvas.Ellipse(ship_front.X-2,ship_front.Y-2,ship_front.X+2,ship_front.Y+2);
fld.Picture.Bitmap:=bm_ship;
...