Код
image1.Canvas.Pen.Width:=1;
image1.Canvas.lineto(20,20);
image1.Canvas.Pen.width:=5;
image1.Canvas.lineto(21,21);
image1.Canvas.Pen.width:=4;
image1.Canvas.lineto(22,22);
image1.Canvas.Pen.width:=3;
image1.Canvas.lineto(23,23);
image1.Canvas.Pen.width:=2;
image1.Canvas.lineto(24,24);
image1.Canvas.Pen.width:=1;
image1.Canvas.lineto(25,25);
За пят точек до конца линии устанавливаем ширину линии 5, к примеру, и далее рисуем по одному шагу с уменьшением ширины. Получается нормальная стрелка.