PaintBox1.Canvas.Pen.Color := clBlack;
  PaintBox1.Canvas.Brush.Color := clBlack;
  PaintBox1.Canvas.Polygon([point(0,0),point(5,5),point(0,10)]); //画箭头  Arrow := TBitmap.create;
  Arrow.Width := 6;
  Arrow.Height := 11;
  Arrow.Canvas.CopyRect(Canvas.ClipRect,PaintBox1.Canvas,Rect(0,0,5,10));可是Arrow里却没加载进箭头,是何道理?