Club Builder

[Ric]

Hola a todos, quisiera saber como acceder a los datos de un DBGrid por ejemplo seleccionando una fila del DBGrid y poder desplegar todos los datos de cada una de las columnas que concuerden con esa fila.

Y también quisiera saber si tiene algún código de un gestor de ciber cafes para estudiarlo ya que quiero desarrollar uno y me quiero dar una idea de como hacerlo.

De antemano muchas gracias

[Droman]

Saludos.

Si quieres recorrer un DBGRID para mostrar las filas que el usuario ha seleccionado, haz esto ( en este caso hago un insert en otra tabla ):

AnsiString s;
if (DBGrid1->SelectedRows->Count > 0)
{
TDataSet *pDS = DBGrid1->DataSource->DataSet;
for (int i=0; i < DBGrid1->SelectedRows->Count; i++)
{
pDS->GotoBookmark((void *)DBGrid1->SelectedRows->Items[i].c_str());
s.operator =("");
s.operator +=("insert into seleccion values ('");
s.operator +=(pDS->Fields->FieldByName("id")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("familia")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("subfamilia")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("descripcion")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("duracion")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("cd")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("modo")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("observaciones")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("autor")->AsString);
s.operator +=("','");
s.operator +=(pDS->Fields->FieldByName("fichero")->AsString);
s.operator +=("');");

SELECCION->SQL->Clear();
SELECCION->SQL->Add(s);
SELECCION->ExecSQL();

}
}

Espero haberte sido de ayuda.
_________________
Entonces el bibliotecario miró a los libros enfurecido y les gritó ¡¡ OOOK !!