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 @   XE2011  阅读(169)  评论(0编辑  收藏  举报
努力加载评论中...
点击右上角即可分享
微信分享提示