Błąd aplikacji po znalezieniu poszukiwanego rekordu

Witam, mam problem, mianowicie programik działa poprawnie jedynie do momentu w którym znajduje poszukiwany rekord. Wówczas pojawia się błąd: raised exception (...) 'Couldn't perform the edit because another user changed the record'.
Baza w Accessie połączona przez ODBC. Mam dwie tabele, w drugiej tabeli szuka rekordów spełniających warunki określone w tabeli pierwszej.

Jeśli ktoś będzie wiedział gdzie jest błąd to proszę dać znać. :-)

Pozdro olo bolo

procedure TForm1.Button1Click(Sender: TObject);
var
a,b:Integer;
begin
  Table1.First;
  while not Table1.Eof do
    begin
    a:=Table1.FieldByName('ID_Dnia_Tygodnia').AsInteger;
    b:=Table1.FieldByName('ID_Terminu').AsInteger;

      Table2.First;
      while not Table2.Eof do
        begin
          Table2.Edit;
          if
          (Table2.FieldByName('ID_Dnia_Tygodnia').AsInteger = a) and
          (Table2.FieldByName('ID_Terminu').AsInteger = b)
          then
          Table2.FieldByName('Status').AsString := 'wolne';
          Table2.Next;
        end;
    Table1.Next;
    end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
a,b:Integer;
begin
  Table1.First;
  while not Table1.Eof do
    begin
    a:=Table1.FieldByName('ID_Dnia_Tygodnia').AsInteger;
    b:=Table1.FieldByName('ID_Terminu').AsInteger;

      Table2.First;
      while not Table2.Eof do
        begin
          if
          (Table2.FieldByName('ID_Dnia_Tygodnia').AsInteger = a) and
          (Table2.FieldByName('ID_Terminu').AsInteger = b)
          then
begin
          Table2.Edit;
          Table2.FieldByName('Status').AsString := 'wolne';
          Table2.Post;
end;
          Table2.Next;
        end;
    Table1.Next;
    end;
end;

Niestety, nadal ten sam błąd :-(

Table1/Table2 wskazują dokładnie na tą samą tabelę?

Table1 i Table2 wskazują na osobne tabele, Table1 zawiera pola ID_Dnia_Tygodnia i ID_Terminu, a Table2 zawiera ID_Dnia_Tygodnia, ID_Terminu i oprócz tego jeszcze inne.

Zrobiłem w Accessie od nowa dwie tabele, tylko trochę zubożone, w pola inne niż te po których szuka wpisałem byle co (a te po których szuka uzupełniłem tak samo jak w pierwowzorze), wkleiłem kod który poprawiłeś i programik działał poprawnie. Następnie usunąłem z bazy tabele, wkleiłem te pierwsze oryginalne i znowu ten sam komunikat o błędzie! Nie mam pojęcia co to może być. Może to coś z bazą?