Проверка правильности введённых данных в StringGrid (C++ Builder)

#include <ctype.h>
 
 
 
char check1,check2;
String proverk=StringGrid1->Cells[1][1];
 
if(proverk=="")
StringGrid1->Cells[1][1]='0'; //  если ничего не введено - заменить на ноль.
check1=proverk[1];
check2=proverk[proverk.Length()];
if(isdigit(check1)==0 || isdigit(check2)==0)
   ShowMessage("Error"); //если первый или последний символ - не цифра - выдать сообщение об ошибке ввода;
 if(proverk.Pos(',')){   //Проверка запятой
 
  proverk=proverk.Delete(1,proverk.Pos(','));
  if(proverk.Pos(',') ) ShowMessage("Больше двух запятых"); //если введено больше 2х запятых - выдать сообщение об ошибке ввода;
 if(proverk.Length()>2)  ShowMessage("После запятой введено больше 2 символов!");
 
 
 }
 else
 ShowMessage("Нет запятой!");

#include <System.RegularExpressions.hpp>
 
// ...
 
    String s = StringGrid1->Cells[1][1];
 
    if (s.IsEmpty()) s = "0";
    if (!IsDigit(s[1]) || !IsDigit(*(s.LastChar())))
        ShowMessage(L"Первый или последний символ - не цифра");
    else if (TRegEx::Matches(s, ",").Count > 2)
        ShowMessage(L"Больше двух запятых в строке");
    else if (TRegEx::Matches(s, ",([^,]{3,})").Count > 0)
        ShowMessage(L"После запятой больше двух символов");
    else ShowMessage(String(L"Проверка пройдена: ") + s);

void __fastcall TMainForm::Tabl_DsKeyPress(TObject *Sender, System::WideChar &Key)
{
    if (!isdigit(Key))
        {
        ShowMessage("Вводите только числа!!!");
        }
}

    if (!isdigit(Key))
    {
        Key = 0; // Магия :)
        ShowMessage(L"Вводите только числа!!!");
    }