Refrescar una Query
Hola a Todos, tengo el siguiente inconveniente, estoy utilizando firebird 1.0 y delphi6, y tengo inconvenientes al momento de usar el coponente query de interbase, ya que no logro que refresque los datos que actualizo, es decir si ejecuto el programa en dos terminales distintas la que realiza la modificación esta ok, pero en la segunda terminal me veo obligado a cerrar el exe y abrirlo nuevamente para poder ver los cambio, aca va una porcion del codigo en el cual tengo este problema:
dmPedidos.ibqArts.Active := False;
dmPedidos.ibqArts.Close;
dmPedidos.cdsArts.Active := false;
dmPedidos.cdsArts.Close;
dmPedidos.ibqArts.Sql.Text := 'Select CODIGO, NOMBRE, PRECIO from Articulos where Codigo = ' + '''' + strCodigo_Articulo + '''';
dmPedidos.ibqArts.Open;
dmPedidos.ibqArts.Active := True;
dmPedidos.cdsArts.Open;
dmPedidos.cdsArts.Active := True;
Ahora, supongamos que en la terminal 1 cambio el precio del articulo 1 y ejecuto este codigo la query me devuelve los datos correctos, en cambio en la terminal 2 me sigue devolviendo el precio anterior al cambio.
Agradecere cualquier tipo de ayuda al respecto!!!
|