Necesito posicionar al cursor en la fila de la grilla en que estaba, antes
de que se ejecute el procedimiento 'consulta' que detallo a continuacion
¿ Como guardo la posicion y como la activo en el procedimiento consulta ?
Procedure TFTelefonos.consulta(vid: integer);
begin
if QTelefonos.active then QTelefonos.Close;
QTelefonos.DatabaseName:='dbagenda';
QTelefonos.SQL.Clear;
QTelefonos.SQL.Add('SELECT * FROM TELE.DBF ');
QTelefonos.SQL.Add('ORDER BY RAZSOC');
QTelefonos.open;
qtelefonos.Refresh;
dbgrid1.Refresh;
end;
La secuencia fue asi: yo muestro en una grilla el resultado de un query, luego ante un evento en la grilla por medio de un sql modifico el contenido de la tabla, entonces debo "refrescar" la vista de la grilla con el procedimiento de arriba "consulta", pero cuando vuelvo pierdo la posicion del cursor dentro de la grilla. Ese es mi problema. Gracias a todos!!!!, saludos Alejandro de Quilmes.
|
