Prueba esto:
Código Delphi
[-]
DataModule_Fact_Albar.QueryAlb.first;
with DataModule_Fact_Albar do
begin
- while not(Query_Alb.Eof) do
begin
- Query_AlbConvertido.Edit;
- Query_AlbConvertido.value:='SI';
- Query_AlbConevertido.post;
- Query_AlbConvertido.Next;
end;
end;
Un saludo
Edu