Identificar registro actual en el dbgrid
 

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.

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

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

Saludos

Al parecer, no veo nada fuera de lo normal :o. Si ese es el error, no me explico por que sale.:confused:

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

Saludos

Verifica el contenido de la variable a ver:confused:

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;

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...

Saludos

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

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

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

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