Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#10

Re: Richtungs bzw. Vektorpfeil zeichnen

  Alt 14. Aug 2007, 13:04
Also ich würde die Sache so angehen:
1.) ein "Pfeil" besteht aus 7 Punkten, die mit einem Polygon Zug verbunden werden.
2.) Also muss man erstmal einen Pfeil im Ursprung konstruieren. Die Pfeilspitze sollte (muss aber nicht) im Ursprung
sitzen.
Der Pfeil muss auf kariertem Papier aufgezeichnet und die Koordinaten der einzelnen Punkte abenommen werden.
Delphi-Quellcode:
Pfeil: array[1..7] of TPoint;
pfeil[1] := Point(x1, y1);
....
canvas.Polygon(Pfeil);
3.) da reicht aber noch nicht. Der Pfeil muss vor dem Zeichnen noch gedreht und anschliesend verschoben werden.
siehe Code-Library: http://www.delphipraxis.net/internal...ct.php?t=38391

Wie man sieht, ist diese Technik besser als die bisherigen Vorschläge, da man so nicht nur Pfeile, sondern auch Kreuze und andere Symbole zeichen kann.
Andreas
  Mit Zitat antworten Zitat