Bräuchte Hilfe beim Zeichnen von u=u_t*cos(2*pi*f_t*t)

[Mavarik]

Naja ich schreibe immer...

CX := cos(Winkel*180/Pi)

Daher liefert folgende procedure auch das "richtige" Ergebniss..

Delphi-Quellcode:

  for i:=0 to 360 do
    begin
      Form1.Canvas.MoveTo(100,100);
      Form1.Canvas.LineTo(trunc(sin(i*180/Pi)*100)+100,trunc(Cos(i*180/Pi)*100)+100);
    end;

Frank...