void __fastcall TForm1::Button1Click(TObject *Sender) { int k = 100; int t = 0; int r = 0; try { r = k / t; } catch(...) { Caption = "divide zero..."; } }