>EDatabaseError< Einfüge Editiermodus || Was soll ich machen

[EDatabaseError]

Kann mir mal jemand helfen?

Code:

if inputquery('Entnahme-Assistent', 'Wie viele Artikel sollen entnommen werden?', str1) = true then
       begin
        i5 := StrToInt(str1);
        str1 := '';

        DataModule4.Tabelle.Active := false;
        DataModule4.Tabelle.readonly := false;

        DataModule4.Tabelle.FieldValues['ART_STUECK'] := i4 - i5;
        datamodule4.tabelle.post;
        
        cls;
        formentnehmen.hide;
        form2.show;
       end
      else str1 := '';

Bei folgendem Code bekomme ich immer eine Exception das die Tabelle weder im Einfüge noch im Editiermodus ist was soll ich machen? Der Aktive Datensatz enthält bereits eine Variable ART_STUECK die ich ändern will.

Danke schon im vorraus.