Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - RealToInt ?


Pyr0cracker - Mo 07.04.03 11:16
Titel: RealToInt ?
Hallo, kann mir jemand sagen wie ich ein "RealToInt" erzeugen kann?
gibt ja keinen Befehl dafür.
Ich brauche das um den Winkel auszurechnen:

Quelltext
1:
2:
button1.top := button1.top + cos(winkelx);
button1.left := button1.left + sin(winkelx);

Wenn jemand eine möglichkeit hat bitte sagen !

danke,


UGrohne - Mo 07.04.03 11:16

Versuchs mal mit round(), denn int kann ja keine Dezimalstellen aufnehmen.

Gruß


Klabautermann - Mo 07.04.03 11:20

Wenn du einfach die Nachkomastellen abschneiden willst, dann ist Trunc dein Befehl.

Gruß
Klabautermann


Pyr0cracker - Mo 07.04.03 11:24

Dann is es aber immer noch REAL.
Gibts denn keinen RealToInt-ähnlichen Befehl?


UGrohne - Mo 07.04.03 11:33

Falsch, sowohl Trunc, als auch round geben einen Int64 zurück, also kein real


LCS - Mo 07.04.03 11:35

Hi
Trunc liefert einen Integer zurück. Du kannst also einfach schreiben:

Quelltext
1:
2:
button1.top := button1.top + trunc(cos(winkelx));
...


Gruss Lothar