Problema con ado, necesito ayuda urgente

[montesoft]

Lo siento amigo Caral, el codigo no manda error pero los registros no se liberan de la memoria, abro la base de datos desde acces y no estan y en el programa si, las eliminaciones o cambios solo se aprecian si reinicio el programa, ¿raro no?.

Gracias por tu ayuda...

[[Caral]]

Hola
No entiendo la razon.
Si no es muy grande el programa y la BD enviamelos, lo reviso.
Saludos

[[Caral]]

Hola
No entiendo muy bien, explicame esto:
1. Cuando ejecuto el delete los registros SI se eliminan de la BD pero NO del programa ?.
2. Cuando ejecuto el delete los registros NO se eleminan de la BD ?.
3. NO hace nada .
Saludos

[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