Also vielleicht bin ich blöd, aber ich versteh die Frage nicht.
Im zweiten Code werden genau je eine Rechenoperation mehr ausgeführt. Ich würde mich eher wundern wenn das gleiche rauskommt und es vorsorglich zum Patent anmelden bevor es zu Spät ist.
Grundsätzlich funktioniert:
x := x + 1;
Somit kannst du getrost mit einer Zuweisung eines Wertes auf eine Variable arbeiten indem du diese in der Zuweisung als Operator verwendest.
Der Punkt ist hier, dass bei beiden Codes die mathematischen Operationen in den ersten beiden Zeilen identisch sind. Es gibt halt nur zwei Zeilen mehr im ersten Code.
Identisch zum ersten währe folgende Anweisung:
Delphi-Quellcode:
x := ( ( x - dx ) * cos(alpha) ) - ( ( y - dy ) * sin(alpha) ) + dx;
y := ( ( x - dx ) * sin(alpha) ) + ( ( y - dy ) * cos(alpha) ) + dy;
Gruß oki