Actualizacion BD en Ado

[principiante22]

Saludos, Tengo dos TAdoQuery, 1 de ellos es en el que realizo una entrada y este en su evento AfterPost tiene el siguiente codigo:

Código Delphi [-]
procedure TForm1.ADOQuery1AfterPost(DataSet: TDataSet);
begin
Adoquery2.close;
Adoquery2.open;
Adoquery1.Close;
Adoquery1.Open;
end;

Pero el Adoquery2 (que tiene conectada un DataSource para presentar los datos en un dbgrid) no se actualiza de los nuevos datos, SOLO lo hace (actualizarse) de ves en cuando, no siempre .

Espero haberme explicado bien, muchas gracias y bye