Levantar Datos de Columna en Grid

[marcoszorrilla]

Supongamos que en la primera columna está el código que necesitamos, aquí tienes un ejemplo de como capturar dicho valor:

Código Delphi [-]
 procedure TForm1.DBGrid1CellClick(Column: TColumn);
 begin
  ShowMessage(Query1.fields[0].asString);
 end;

Luego quedaría, con un componente tipo UpdateSql, ejecutar la orden correspondiente contra este código capturado y tabla correspondiente.

Un Saludo.

[cahp]

Hola:

el dataset que este asociado al dbgrid, esta posicionado en el registro que se posiciona el grid.

Si necesitas mas informacion, te lo amplio.

Saludos.

[lionsoft]

Si podes ampliar el tema del dataset, seria interesante.

Gracias por las respuestas

Lion

[[Lepe]]

lo que ha dicho cahp es básicamente lo propuesto por Marcos Zorrilla.

Puedes tener 80 campos en la consulta SQL, pero solo mostrar 10 en el grid, (si es una consulta persistente es muy facil quitar los campos que no quieres que visualice el usuario), por tanto, puedes usar:

Código Delphi [-]
    procedure TForm1.DBGrid1CellClick(Column: TColumn);
 begin
  ShowMessage(Query1.fields[0].asString);
// o si te parece más comodo
  ShowMessage(Query1.fieldByName('campoClave').asString);
 end;

Lo de campos persistentes, es simplemente que en diseño tienes puesta la cláusula SQL y al conectar el grid, en tiempo de diseño, das un doble clic al grid para añadir los campos que quieres ver.

De esta forma ya puedes acceder a los campos claves que necesites en algun momento, aunque el usuario no lo vea en pantalla.

Saludos

[cahp]

No puede estar mejor explicado!!

Saludos.

[lionsoft]

La solucion me sirvió si clickeaba una de las celdas de la fila.. ahi si levantaba correctamente el dato.
Pero la idea es clickear la fila.. porque el usuario al ver el cursor en forma de triangulo en el grid, supone que debe moverse y elegir con eso.
Como hago para distinguir esto?