Problema con ado, necesito ayuda urgente

[montesoft]

Cuando ejecuto el delete los registros SI se eliminan porque (con el programa abierto) abro desde access la bd y ya no estan, cierro access y los busco dentro del programa y aun se encuentran. Acces no los muestra pero el programa si aun despues de "eliminarlos".

[[Caral]]

Hola
El componente donde los muestras me imagino que es un DBgrid.
Este componente tiene que estar ligado a algun otro (ADOTable o AdoQuery), por medio de un datasource.
Si cierras y abres estos entonces se actualizara el programa.
Ejemplo:
Digamos que el DBGrid esta ligado a un AdoTable y que el adoQuery solo ejecuta la accion de eliminar, entonces:

Código Delphi [-]
AdoConnection1.BeginTrans;
try
with AdoQuery1 do
  Begin
  SQL.text:= 'Delete From Estudiante Where Grado = "09"';
   ExecSQL; // ejecuto el query.
  End;
AdoConnection1.CommitTrans; // actualizo la BD
AdoTable.Close; // cierro la tabla.
AdoTable.Open; // abro la Tabla
except
     on E:Exception do AdoConnection1.RollbackTrans;
end;

Saludos

[montesoft]

No uso un dbgrid, busco el registro con locate (a traves del campo llave) y lo encuentra y sí.., si cierro y abro la tabla hace justo lo que necesito pero a mi parecer no es lo optimo pues cuando usaba bde no tenia que hacer eso y los cambios se reflejaban inmediatamente.

Será que no hay manera o solo como comentas, es decir cerrando y abriendo las tablas?

[[Caral]]

Hola
Que yo sepa la unica forma de actualizar los datos es:

1- Cerrando y abriendo la tabla.

Código Delphi [-]
try
with AdoQuery1 do
  Begin
  SQL.text:= 'Delete From Estudiante Where Grado = "09"';
   ExecSQL; // ejecuto el query.
  End;
AdoConnection1.CommitTrans; // actualizo la BD
AdoTable.Close; // cierro la tabla.
AdoTable.Open; // abro la Tabla
except
     on E:Exception do AdoConnection1.RollbackTrans;
end;

2- Haciendo un refrech del componente.

Código Delphi [-]
try
with AdoQuery1 do
  Begin
  SQL.text:= 'Delete From Estudiante Where Grado = "09"';
   ExecSQL; // ejecuto el query.
  End;
AdoConnection1.CommitTrans; // actualizo la BD
AdoTable.Refrech; // refresco la tabla
except
     on E:Exception do AdoConnection1.RollbackTrans;
end;

3- Haciendo un Requery.

Código Delphi [-]
try
with AdoQuery1 do
  Begin
  SQL.text:= 'Delete From Estudiante Where Grado = "09"';
   ExecSQL; // ejecuto el query.
  End;
AdoConnection1.CommitTrans; // actualizo la BD
AdoTable.Requery(); // actualizo la tabla
except
     on E:Exception do AdoConnection1.RollbackTrans;
end;

Saludos

[montesoft]

Listo compañero, le agradezco por la ayuda brindada.
Muchisimas gracias