RefreshRecord

[ArtPortEsp]

Por cierto, en el segundo codigo me falto la linea : DM.Qactualiza.Execute;

En el codigo que estoy probando si esta... perdon por la omision

[Casimiro Noteví]

Los pasos a seguir son:

Código Delphi [-]
query.close;
query.selectsql.text:='select ...';
query.open;

[ArtPortEsp]

Empezado por Casimiro Notevi

Los pasos a seguir son:

Código Delphi [-]
query.close;
query.selectsql.text:='select ...';
query.open;

Pero... he usado RefreshRecord con anterioridad sin problema, no entiendo por que no funciona esta vez; mi sospecha es que es un campo "calculado" y no directo.

Y aun asi, no entiendo por que; es mas, creo que he usado refreshrecord ya con ese tipo de campos pero no puedo encontrar el ejemplo

[Casimiro Noteví]

Bien, es que no sé qué componentes estás usando, ni el contexto de esas instrucciones.

[ArtPortEsp]

Empezado por Casimiro Notevi

Bien, es que no sé qué componentes estás usando, ni el contexto de esas instrucciones.

Tienes toda la razon...

Estoy usando TMyQuery de DEVART (MyDac).. conectados a una BD MySQL 5.6

El desarrollo esta en Delphi 7...

La verdad es mas frustrante que indispensable, igual puedo hacer lo que indicas, pero creo que es mas lento que el RefreshRecord, no se.

[ecfisa]

Hola.

Empezado por ArtPortEsp

..., pero creo que es mas lento que el RefreshRecord, no se.

No puedo aseverarlo en los componentes de DEVART, pero en todos los componentes que conozco, el método Refresh retiene la posición actual del cursor en la tabla luego la cierra, la abre y restaura la posición; por ese motivo no creo que tengas diferencia en los tiempos al usar un modo u otro.

Pero si lo que deseas es no perder la posición de antes de cerrar/abrir, podes hacer:

Código Delphi [-]
var
  BM: Pointer;
begin
  Qpolizas.DisableControls;
  try
    BM := Qpolizas.GetBookmark; // guardar posición
    try
      if Evale.Text <> '' then
      begin
        // acciones que mueven la posición en la tabla
        // ...
      end;
      Qpolizas.Close;
      Qpolizas.Open;
      Qpolizas.GotoBookmark(BM); // volver a posición guardada
    finally
      Qpolizas.FreeBookmark(BM); // liberar el puntero
    end;
  finally
    Qpolizas.EnableControls;
  end;
  Qpolizas.RefreshRecord;
end;

Saludos