IntToStr

 
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  try
  {
    Form1->Caption = IntToStr(StrToInt(Edit1->Text) * StrToInt(Edit2->Text));
  }
  catch(...)
  {
    ShowMessage("You must specify integer values. Please try again.");
  }
}




posted @ 2012-06-03 17:50  XE2011  阅读(164)  评论(0编辑  收藏  举报