void __fastcall TfrmThread::Button8Click(TObject *Sender)
{
  AnsiString Test;
  Test.sprintf("%E",4./(3600.*24.*30.*8000.));
  ShowMessage(Test);
}

적당한 답이 될런지.. 결과는 맞게 나옵니다..
AnsiString 의 method 가 싫으시면
표준 함수 sprintf 를 쓰셔도 됩니다.
이에대한 설명은 Tips'N Tricks 에 있습니다.