Не обрабатываются исключения

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
#include <iostream>
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
float u ;
float r ;
float i ;
 
try
{
u = StrToFloat(Edit1->Text) ;
r = StrToFloat(Edit2->Text) ;
}
 
catch (EConvertError &exception)
{
 ShowMessage("Надо ввести число через запятую . ") ;
}
try
{
i = u/r ;
}
 
catch (EZeroDivide &exception)
{
ShowMessage("На ноль делить нельзя. ") ;
}
 
Label4->Caption = "Ток : " + FloatToStrF(i, ffGeneral , 7,2) + " A"  ;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Form1->Close();
}
//---------------------------------------------------------------------------

float u ;
float r ;
float i ;
 
try
{ 
   u = StrToFloat(Edit1->Text) ; 
   r = StrToFloat(Edit2->Text) ;
   i = u/r ;
}
catch (EConvertError &E)
   {
       ShowMessage(E.Message) ;
   }
catch (EZeroDivide &E)
  {
       ShowMessage(E.Message) ;
  }