Ошибочная логика расчета

if (CheckBox1->Checked==true)
   X=X*180/3.14;

//---------------------------------------------------------------------------
 
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
 if ((Key>='0' && Key<='9')||(Key==',')||(Key==(char)8)) {}
 else Key=0;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 double X,Y;
if (Edit1->Text=="")
 {
  ShowMessage("Ââåäèòå äàííûå");
  return;
 }
 X=Edit1->Text.ToDouble();
 if (CheckBox1->Checked==true)       
   X=X*180/3.14;                             // (Должен переводить из радиан в градусы. Неправильно считает.
 if (RadioGroup1->ItemIndex==0)
  Y=sin(X);
 if (RadioGroup1->ItemIndex==1)
  Y=cos(X);
 if (RadioGroup1->ItemIndex==2)
  Y=tan(X);
 if (RadioGroup1->ItemIndex==3)
  Y=1/tan(X);
 Edit2->Text=FloatToStr(ceil(Y*100)/100);
}
//---------------------------------------------------------------------------