Ver Mensaje Individual
  #4  
Antiguo 13-03-2010
jaimeh jaimeh is offline
Miembro
 
Registrado: mar 2007
Posts: 68
Reputación: 18
jaimeh Va por buen camino
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
Responder Con Cita