Identificar registro actual en el dbgrid

[ilichhernandez]

Hola amigos, me acaba de asaltare una duda, cuando estoy sobre un dbgrid, y hago click en uno de los registros de ese dbgrid, como rescato ese registro.... intente con lo siguiente....

Código Delphi [-]
procedure Tform_log_sql.DBGrid2DblClick(Sender: TObject);
var cadenasql : string;
begin
cadenasql := qry_logsql.FieldByName('sqlquery').AsString;
qry_exec_log.SQL.clear;
qry_exec_log.SQL.add(cadenasql);
qry_exec_log.Open;
end;

Alguien sabe como se hace realmente pues me lanza un error que desconoce el campo sqlquery (es un campo string) y el campo se escribe asi y pertenece a la tabla logsql.....

Alguien por favor....

Gracias.

[vtdeleon]

Saludos

como rescato ese registro.

Como asi? Explicate un poco mejor.
Guardas sentencias en este campo?
Muestranos la sentencia del dataset 'qry_logsql'.

[ilichhernandez]

Esta es la sentencia de la query...

Código SQL [-]
Select u.nombre,l.fechaconsulta,l.tipoconsulta,l.sqlquery 
from logconsultassql l,usuarios2 u 
where l.usuario = u.rut 
order by  l.fechaconsulta

y me arroja varios registros, ahora lo que yo quiero es por ejemplo hacer click en un registro y la informacion de ese registro pasarla a algunas variables para utilizarlas en otro proceso....

saludos

[vtdeleon]

Saludos

Al parecer, no veo nada fuera de lo normal .

...un error que desconoce el campo sqlquery (es un campo string) y...

Si ese es el error, no me explico por que sale.

Nota:Utilzia las etiquetas para los codigos (SqL, DELPHI, Y demas) [sql] [ /sql]

[vtdeleon]

Saludos

Verifica el contenido de la variable a ver

Código Delphi [-]
procedure Tform_log_sql.DBGrid2DblClick(Sender: TObject);
var cadenasql : string;
begin
cadenasql := qry_logsql.FieldByName('sqlquery').AsString;
showmessage(cadenasql);
qry_exec_log.SQL.clear;
qry_exec_log.SQL.add(cadenasql);
showmessage(qry_exec_log.SQL.text);
qry_exec_log.Open;
end;

[ilichhernandez]

Revise el valor de la cadena y si lleva la sentencia sql, pero no me muestra datos en el otro grid ni tampoco me da un error...

[vtdeleon]

Saludos

Demoni...., solo me queda preguntar cosas obvias...

Chequea si el grid esta relacionado al datasource correcto y a su ves a su dataset

Prueba en tiempo de dise~o qry_exec_log, con cualquier sentencia

[lucasarts_18]

Empezado por ilichhernandez

Revise el valor de la cadena y si lleva la sentencia sql, pero no me muestra datos en el otro grid ni tampoco me da un error...

Hola Yo prefiero siempre cerrar el dataset.

Código Delphi [-]
 procedure Tform_log_sql.DBGrid2DblClick(Sender: TObject);
var cadenasql : string;
begin
cadenasql := qry_logsql.FieldByName('sqlquery').AsString;
showmessage(cadenasql);
qry_exec_log.SQL.clear;
qry_exec_log.close; //Pon esto aquí
qry_exec_log.SQL.add(cadenasql);
showmessage(qry_exec_log.SQL.text);
qry_exec_log.Open;
end;

Después nos dirás como te fue

Hasta Luego