realisierung von pfeilen zeichnen

[Nicodius]

Delphi-Quellcode:

  {Flaeche.Canvas.MoveTo(X,Y);   //    ---+
  Flaeche.Canvas.LineTo(X+10,Y+10);// ---_-
  Flaeche.Canvas.LineTo(X,Y+10);//    ---_-/
  Flaeche.Canvas.MoveTo(X+10,Y+10);// ---_-
  Flaeche.Canvas.LineTo(X+10,Y);} //    ---_-\    = ---->

mit diesem code kann ich ne spitze machcne(von ner freundin.. die hat das sofort gehabt ) --- aber die zspitze zeig t immer in de rechte untere ecke vom formula ... also geht nur bei einer neigung in die ecke runter das der pfeil wie ein pfeil aussieht ...

was kann ich denn dagegen machen?