Delphi Programming RTL Reference|By Category|Alphabetically|By Unit
function DegToGrad(const Degrees: Extended): Extended;
Convert angles expressed in degrees to the value in grads.
var
grad0, grad90, grad180, grad270, grad360 : extended;
begin
grad0 := DegToGrad(0); // == 0
grad90 := DegToGrad(90); // == 100
grad180 := DegToGrad(180); // == 200
grad270 := DegToGrad(270); // == 300
grad360 := DegToGrad(360); // == 400
end;
|
GradToDeg,
|
Free Delphi code snippet inside every Delphi Newsletter! |
|
|
|
Got some code to share? Got a question? Need some help? |
|
|