void __fastcall TForm1::Button4Click(TObject *Sender)
{
AnsiString laConsulta;
laConsulta = "DELETE FROM tsolicitantes<espacio en blanco>";
// SE BORRA LA PRIMER FILA DE LA TABLA
laConsulta = laConsulta + "WHERE Id_Solicitantes = '1'";
qPrimario->Close();
qPrimario->SQL->Clear();
qPrimario->SQL->Add(laConsulta); // hasta acá todo bien
qPrimario->ExecSQL(); // aparentemente acá se produce el problema y no se como solucionarlo
MessageDlg("Los datos se Borraron exitosamente", mtInformation, TMsgDlgButtons() << mbOK, 0);
}