ADODataSet Der Vorgang ist in diesen Zusammenhang nicht zugelassen

[blondervolker]

Hallo,

habe eine Tabelle in Access ID,Preis,DEU.

Nun wollte ich wenn in DEU kein Eintrag ist den aktuellen Datensatz löschen.
Aber denne kommt nach der Ausführung eine Fehlermeldung:
Der Vorgang ist in diesen Zusammenhang nicht zugelassen.
(ich bin kein Profi)
Was läuft da falsch?

Hier mal der Code:

Delphi-Quellcode:

procedure TForm1.Button6Click(Sender: TObject);
var
i : integer;
begin
while not ADODataSet1. Eof do
begin
ADODataSet1.Edit;
 if ADODataSet1.FieldByName('DEU').AsString = ''
 then
  ADODataSet1.DeleteRecords;
  ADODataSet1.Next;
  Application.ProcessMessages;
  with ProgressBar1 do
  begin
    Min := 0;
    Max := ADODataSet1.RecordCount;
    for i := Min to Max do
    Position := i;
    ADODataSet1.Next;
end;
end;
end;