delphi datenmenge weder im editier- noch im einfügemodus

[RalfSi]

Hallo,

das leidige Thema im Betreff noch einmal, da ich einfach nicht erkennen kann, wo der Fehler liegt:

Code:

ExcelApp.Workbooks.Open(dateiname);
  dmkunden.tblkundendaten.Connection.StartTransaction;
  if not (dmkunden.tblkundendaten.State in [dsInsert]) then
        dmkunden.tblkundendaten.Insert; //das zumindest macht er

  try
  begin
        
        dmkunden.tblkundendatenanrede.AsString      := ExcelApp.Cells[5, iPers].Value;
        dmkunden.tblkundendatentitel.AsString       := ExcelApp.Cells[6, iPers].Value;
        dmkunden.tblkundendatennachname.AsString    := ExcelApp.Cells[7, iPers].Value;
        dmkunden.tblkundendatengeburtsname.AsString := ExcelApp.Cells[8, iPers].Value;
        //weitere Zuweisungen
  end;

  if dmkunden.tblkundendaten.State in [dsInsert] then dmkunden.tblkundendaten.Post;
  
  //^^State = dsInsert(!) und daher will er den Post ausführen und hierbei erscheint die im Betreff genannte Fehlermeldung.
      
  dmkunden.tblkundendaten.Connection.Commit;
  result:=true;
  [...]

Ich danke schon einmal jetzt für Tipps.