Cita:
Empezado por Casimiro Notevi
¿Dónde está el update?
|
En el código, al final:
Código:
void __fastcall TfAboRec::DBGrid1CellClick(TColumn *Column)
{
int nValor;
if (Column->FieldName == "SELECCION")
{
nValor = Column->Field->AsInteger;
fPersona->tTemp->Edit();
fPersona->tTemp->FieldValues[Column->FieldName] = !nValor;
fPersona->tTemp->Post();
}
}
//---------------------------------------------------------------------------
Después de haber subido el mensaje hice otra prueba distinta con este otro código:
Código:
void __fastcall TfAboRec::DBGrid1CellClick(TColumn *Column)
{
int nCodigo, nValor;
if (Column->FieldName == "SELECCION")
{
nValor = Column->Field->AsInteger;
nCodigo = DBGrid1->Columns->Items[4]->Field->Value;
Query->Close();
Query->SQL->Text = "UPDATE " + cTabTemp + " SET Seleccion = :Seleccion WHERE Codigo = :Codigo";
Query->ParamByName("Seleccion")->AsInteger = nValor == 0 ? 1 : 0;
Query->ParamByName("Codigo")->AsInteger = nCodigo;
try
{
Query->ExecSQL();
Query->Transaction->Commit();
}
catch(...)
{
}
}
}
//---------------------------------------------------------------------------
Y sí, así me actualizó la tabla... pero ¡me dejó vacío el DBGrid!