Einen schönen guten Abend ... und wieder einmal bin ich auf eure Hilfe angewiesen ...
Ich möchte einige Punkte um ein beliebiges Zentrum drehen ... es klappt soweit auch ganz nur verzerrt sich die Figur ... ist mein Algorithmus falsch ??

// cosA und sinA sind Arrays mit den schon errechneten Werten um Rechenzeit zu sparen

zusammenfalten · markieren

Delphi-Quellcode:

function drehen(w : integer; Punkte : TPunkte; dPunkt : TPoint):TPunkte;
var i : integer;
    P : TPoint;
begin
 for i:=0 to length(Punkte)-1 do
 begin
  P:=Punkte[i];
  Punkte[i].X:=round((P.X-dPunkt.X)*cosA[w]-(P.Y-dPunkt.Y)*sinA[w])+dPunkt.X;
  Punkte[i].Y:=round((P.Y-dPunkt.Y)*cosA[w]+(P.X-dPunkt.X)*sinA[w])+dPunkt.Y;
 end;
 result:=Punkte;
end;

ich hoffe ihr könnt mir helfen ... THX

Sieht richtig aus. Sicher, dass du die Arrays richtig befüllt hast?

w ist der Winkel - sicher dass das ein integer sein soll !?

Ein Double oder Single wäre glaube ich passender ...

Es sei denn, du behandelst den integer als eiune Festkommazahl und ... passt bei den winkelfunktionen auf

Oder es ist ein Winkel in Grad - wobei eine Ganzzahl durchaus ausreichend sein kann.

Wobei 1. Grad nicht so schön sind wie rad ^^ und 2. sich die Rundungsfehler #auch bei Gard aufaddieren können.

Wenn du z.B. eine Animation machst, in der du eine Figur drehst, wirdst du mit integer imho nur wenig Freude haben

Aber für mich sieht das ganze auch an sich richtig aus ...

danke für das fleißige Antworten,
aber das Problem hat sich gelöst da ich die Punkte jetzt als Extended werte speichere und erst beim Zeichnen runde

Zitat:

Ein Double oder Single wäre glaube ich passender ...

wir leben doch im Zeitalter wo Arbeitsspeicher nicht mehr ganz so wichtig ist ...

Öhm, hat damit aber nun eigentlich nichts zu tun. Int und Single sind beide 32 Bit breit, nur dass du mit Single deutlich feinstufiger Winkel übergeben kannst, da es zwischen 0..359 höher auflöst als ein Integer. Wenn überhaupt könntest du mit Rechenzeit argumentieren, wobei du jedoch mit einem Float-Typen an dieser Stelle fast sogar noch schneller sein könntest, da du den Wert ohnehin sofort in eine trigonometrische Funktion wirfst.

Edit: Okay, tust du nicht, du nimmst eine LUT. Dann schaut des wieder anders aus. Erst ganz lesen, dann denken, dann posten - hab ja verstanden . Und wenn die LUT für deine Zwecke ausreicht ist da nix gegen einzuwenden