Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
26. Feb 2005
Gerade aufgefallen, passt dieses Thema zum diesem Thread :gruebel: ?
Eher Programmieren Allgemein.
Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
25. Feb 2005
Wenn du das gemeint hast, dann ist ja alles ein Misverständniss. :zwinker:
Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
25. Feb 2005
Was mir schon bekannt ist (muss aber nicht richtig sein):
Sin256 sollte ungefäher folgendes machen (99% sicher):
Sin256 := sin( x * pi / (256/2));
Und damit Sin und Sin256 sind nicht gleich. Da sollte auch dein Problem sein.
Genau das wird auch gemacht, aber ohne eine neue Funktion zu definieren.
Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
25. Feb 2005
Ich hoffe das hilft:
type
TForm1 = class(TForm)
GroupBox1: TGroupBox;
Label2: TLabel;
Label1: TLabel;
Label3: TLabel;
procedure FormPaint(Sender: TObject);
Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
25. Feb 2005
Angle:=trunc((arctan((Aim.Y-Player.Y)/(Aim.X-Player.X)) * 180/pi));
Warum nicht so:
Angle:=Round((arctan((Aim.Y-Player.Y)/(Aim.X-Player.X)) * 180/pi));
Am sonsten, wenn du uns Code posten würdest, könnten wir hilfreicher sein.