Hola amigos, este es codigo de mi filtro:
procedure TCuentas.Button1Click(Sender: TObject);
begin
adotable1.Active:=true;
adotable1.Filter:='status ='+QuotedStr(edit1.text);
adotable1.Filter:='flag ='+QuotedStr(edit2.text);
adotable1.Filtered:=true;
adotable1.Refresh;
adotable1.Edit;
adotable1.FieldByName('flag').AsString:='activo';
end;
si ven primero filtro mi campo "status" y edit1 esta en blanco, ya que no quiero que me aparezcan las que ya estan actualizadas,
luego filtro "flag" para que no me tome un registro que esté utilizando otra persona (en teoria es lo que pense podria pasar), y en seguida le agrego la palabra "activo" a mi campo flag para que los demas sepan que lo estoy ocupando, pero la actualización no es en tiempo real y no se ya que hacer.
si abrimos 2 veces mi ejecutable, los dos toman al primer registro, y pues no me sirve.
Espero me puedan ayudar.
Gracias
jdattoli
__________________
Welcome to the tragic kingdom
|