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

[EDatabaseError]

danke


sry aber da is noch n fehler entweder darfs bei geöffneter oder bei geschlossener Datenmenge nicht ausgeführt werden.

Code:

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

        DataModule4.Tabelle.Active := true; //egal og true oder false bekomm ne exception
        DataModule4.Tabelle.readonly := false;

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

ps TryStrToInt gibts bei mir net hab delphi 3 prof.