Query no actualiza

[jaimeh]

Buenas a todos,

Gracias por responderme. Voy a poner el código en cuestión.

El siguiente código es de la primera apliación

Código Delphi [-]
   with AutoTablasDM.IBQuery1 do
   begin
     Close;
     Sql.Text := 'Select HORA_SEL from CONFHORA';

     Open;

     first;

     horaSeleccion := FieldByName('HORA_SEL').AsDateTime;
     shoraSeleccion := TimetoStr(horaSeleccion);

     close;

Ahora pongo el update que hace la segunda aplicacion

Código Delphi [-]
     with FTablas2.ibQuery4 do
     begin
        SQL.Text := 'Select * from CONFHORA';
        open;

        cantRegistros := RecordCount;

        close;

        if cantRegistros > 0 then
          SQL.Text := 'Update CONFHORA SET HORA_SEL = ' + horadtp
        else
          SQL.Text := 'Insert into CONFHORA (HORA_SEL) values (' + horadtp + ')';

        ExecSQL;
        Transaction.CommitRetaining;
        close;
     end;

y cierro esta segunda aplicacion

Miro el registro en la tabla y el campo ha cambiado de valor

Ahora, sin haber cerrado la primera aplicación vuelvo
a abrir el query en la primera aplicacion con lo siguiente

[delphi]
with AutoTablasDM.IBQuery1 do
begin
Close;
Sql.Text := 'Select HORA_SEL from CONFHORA';

Open;

first;

horaSeleccion := FieldByName('HORA_SEL').AsDateTime;

close;




[/DELHI]


El problema está en que horaSeleccion tiene el mismo valor
tanto en el primer Select como en este último. Es como si lo
leyese de algun buffer.

A ver si me podéis decir algo.


Saludos a todos

[jaimeh]

Ahora bien, si antes del segundo select de la primera aplicación
cierro y abro la base entonces si me lee el valor actualizado,
pero esta no es la cuestion. La cuestion es que debería funcionar
cerrando y abriendo solo el segundo query de la primera aplicación.

Saludos