Puedes intentar convertir un AnsiString a un float, y protegerlo todo con un try...catch para capturar una posible excepción de conversión de datos.try
{
float valor = StrToFloat(Edit1->Text);
}
catch(EConvertError&)
{
ShowMessage("El valor es incorrecto");
}