TADODataSet - Fehler beim Hinzufügen (Identity Insert)

[Piro]

Moin zusammen,

ich verwende folgenden Code, um einen Benutzer in eine Tabelle zu speichern.

Delphi-Quellcode:

DSData.Close;
DSData.CommandText := 'Select * from fehlteilelosreserve_access where id = -1';
DSData.Open;
DSData.Append;

DSData.FieldByName('lanid').AsString              := edt_setup_access_lanid.Text;
DSData.FieldByName('username').AsString           := edt_setup_access_name.Text;
DSData.FieldByName('access_lieferperformance').AsBoolean := cb_setup_access_lieferperformance.Checked;
DSData.FieldByName('access_admin').AsBoolean      := cb_setup_access_admin.Checked;
DSData.Post; // Hier kommt die Exception jetzt.
DSData.Close;

Ich bin von MS SQL 2008 auf MS SQL 2014 umgestiegen und musste gerade feststellen, dass mein Code nicht mehr funktioniert und ich jetzt folgende Fehlermeldung erhalte.
Siehe Anhang.

Wie gesagt, mit MS SQL 2008 ging es. Ich habe auch schon anstatt des Stern *, die Felder aufgezählt im Select CommandText. Auch leider ohne Erfolg.

Das Feld id ist der Primäre Key mit AutoIncrement.

Ich hoffe, dies Problem geht einer und weiß, was ich machen kann.

Danke im Voraus.
Sven