Assigning procedure to an image

[arnoldb]

Code: [Select]

function DegreeCOS(DegAngle:real):real;
var RadAngle:real;
begin
  RadAngle:=DegAngle/180*pi;
  result:=cos(RadAngle);
end;

Just a note: All trigonometric functions in FPC work in radians by default; if you need the cosine of an angle that is already in radians, then just use cos(x)

Hope this helps, Regards, Arnold

[Waco]

Yep, I discovered that by myself, after some time... And my friend discovered a function named DegToRad, which does pretty much the same. Anyway, thanks for help, but I solved this issue already.