Delphi Canvas Zeichnung drehen

Thema durchsuchen

Ansicht

Themen-Optionen

Canvas Zeichnung drehen

Ein Thema von Gnaaman · begonnen am 1. Jun 2006 · letzter Beitrag vom 2. Jun 2006

Vorheriger Beitrag

Nächster Beitrag

Ratte

Registriert seit: 12. Dez 2003
Ort: Erfurt
345 Beiträge

Delphi 2005 Personal

#11

Re: Canvas Zeichnung drehen

1. Jun 2006, 19:14

Die funktion ist doch relativ selbsterklärend:
function RotateCCW(position,axis: TPoint; alpha: single): TPoint; position ist der Punkt den du drehen willst.
axis ist der Punkt um den gedreht werden soll
alpha ist der Drehwinkel
um die Figur zu drehen musst du einfach für jeden Punkt die funktion aufrufen und den Rückgabewert in deiner zeichenprocedure verwenden. Um die figur langsam zu drehen musst du alpha z:B. in einem timer erhöhen und dann jeweils das Mänchen neuzeichnen.
mfg,
Ratte

Schiffsratte der U.S.S. Delphipraxis, Laderaum 4538
BUSH:= TTerminator.create;