Ya funciona
El problema eran los espacios entre el operador AND y los valores de busqueda. Quedaría asi:
cod1 = ECod1->Text.Trim();
cod2 = ECod2->Text.Trim();
cadena = "Select * from candidatos where id between ";
cadena = cadena + cod1;
cadena = cadena + " AND ";
cadena = cadena + cod2;
ADOQConsulta->SQL->Clear();
ADOQConsulta->SQL->Add(cadena);
FPrincipal->DSListacandidatos->DataSet = ADOQConsulta;
ADOQConsulta->ExecSQL();
FPrincipal->DSListacandidatos->DataSet = ADOQConsulta;
FPrincipal->ADOQListacandidatos->Active = true;
FPrincipal->DSListacandidatos->DataSet = ADOQConsulta;
|