Вынесение проверки try catch в отдельную функцию

void FloatRights (double number, TLabeledEdit *tested)
{
  try
  {
    number=StrToFloat(tested->Text);
  }
  catch(EConvertError &exception) {
    ShowMessage("Неверно введены данные в поле " + tested->EditLabel->Caption + "!");
    return;
  };
};

FloatRights (pids, SinPids);

void __fastcall TForm1::Button2Click(TObject *Sender)
{
  BSign->Clear();
  Series2->Clear();
  double zatr, ampl, peri, leng;
  int cycl;
  try {zatr=StrToFloat(RectZatr->Text);}
  catch (EConvertError &exception) {ShowMessage("Ошибка1 \"\"!"); return;};
  try {ampl=StrToFloat(RectAmpl->Text);}
  catch (EConvertError &exception) {ShowMessage("Ошибка2 \"\"!"); return;};
  if (zeroif(ampl)) return;
  cycl=StrToInt(RectCycl->Text);
  if (zeroif(cycl)) return;
  if (RadRectPeri->Checked)
    {
    try {peri=StrToFloat(RectPeri->Text);}
    catch (EConvertError &exception) {ShowMessage("Ошибка3\"\"!"); return;};
    }
    else
    {
      try {peri=StrToFloat(RectPeri->Text);}
      catch (EConvertError &exception) {ShowMessage("Ошибка4\"\"!"); return;};
      try {peri=1/peri;}
      catch (EDivByZero &exception) {ShowMessage("Ошибка5"); return;};
    };
  if (peri=0) {ShowMessage("Ошибка!"); return;};
  if (StrToFloat(RectLeng->Text)<peri)
  {
    try {leng=StrToFloat(RectLeng->Text);}
    catch (EConvertError &exception) {ShowMessage("Ошибка6 \"\"!"); return;};
  }
    else
    {
      ShowMessage("Ошибка7 " + FloatToStrF(peri, ffFixed, 20, 2)+ "!");
      return;
    };
  if (zeroif(leng)) return;
  if (OneGraf->Checked)
  {
    RectOneGraf (zatr, ampl, peri, leng, cycl, BSign);
  }
  else
  {
    RectPolGraf (zatr, ampl, peri, leng, cycl, BSign);
  };
}

try
  {
    number=StrToFloat(tested->Text);
  }
  catch(EConvertError &exception) {
    ShowMessage("Неверно введены данные в поле " + tested->EditLabel->Caption + "!");
    return;
  };

MyData md;
try {
   // Code that could throw an exception
   md = GetNetworkResource();
}
catch (const networkIOException& e) {
   // Code that executes when an exception of type
   // networkIOException is thrown in the try block
   // ...
   // Log error message in the exception object
   cerr << e.what();
}
catch (const myDataFormatException& e) {
   // Code that handles another exception type
   // ...
   cerr << e.what();
}
 
// The following syntax shows a throw expression
MyData GetNetworkResource()
{
   // ...
   if (IOSuccess == false)
      throw networkIOException("Unable to connect");
   // ...
   if (readError)
      throw myDataFormatException("Format error"); 
   // ...
}

if(!TryStrToFloat(tested->Text,number))
{
    ShowMessage("Неверно введены данные в поле " + tested->EditLabel->Caption + "!");
    return;
}