Помогите пожалуйста.
Есть 2 radiobutton'a как сделать, чтобы при нажатии 2го, результат выходил в (edit1) в градусах для ((кнопок) sin,cos,tg), а при нажатии 1го обратно в радианы?
Тоесть:
радианы
sin(1)=0,84147098....
Нажимаем radiobutton2
(радианы переводятся в градусы)
sin(1)=0,017452506...
Нажимаем radiobutton1
(градусы переводятся в радианы)
и sin oпять равен sin(1)=0,84147098....
также для кнопок сos,tg.
Кнопки sin,cos,tg.
Код:
procedure TForm1.BitBtn24Click(Sender: TObject);
begin
x:=strtofloat(edit1.Text);
y:=sin(x);//sin,cos,sin(x)/cos(x).
edit1.Text:=floattostr(y);
end;