SQLQuery das Feld 'id' wurde nicht gefunden.

[gemy]

Hallo!

ich werde verrückt. Ich finde den Fehler hier einfach nicht.

Ich habe eine Datenbank erstellt mit SQLiteStudio die folgendermaßen aussieht :

https://www.delphipraxis.net/attachm...1&d=1550400520

Nun füge ich mit insert eine Zeile hinzu:

Code:

    SQLQuery1.ParamByName('website').Value := Edit1.Text;
    SQLQuery1.ParamByName('mainurl').Value := Edit2.Text;
    SQLQuery1.ParamByName('username').Value := Edit3.Text;
    SQLQuery1.ParamByName('password').Value := Edit4.Text;
    SQLQuery1.ParamByName('dbname').Value := Edit5.Text;
    SQLQuery1.ParamByName('searchsite').Value := CheckBox1.Checked;
    SQLQuery1.ParamByName('listresults').Value := CheckBox2.Checked;
    SQLQuery1.SQL.Text :=
      'insert into users (website,mainurl,username,password,dbname,searchsite,listresults) '
      + 'values(:website,:mainurl,:username,:password,:dbname,:searchsite,:listresults) ' ;
    SQLQuery1.ExecSQL;

Funkioniert auch. Nun will ich die letzte ID ermitteln mit:

Code:

    SQLQuery1.SQL.Add('SELECT last_insert_rowid() as id FROM users');
    SQLQuery1.open;
        if not sqlquery1.IsEmpty then
    begin
      ID := SQLQuery1.FieldByName('id').AsInteger;
    end;
    SQLQuery1.Close;

Ich bekomme dort eine Fehlermeldung "SQLQuery1: Das Feld 'id' wurde nicht gefunden."

Egal was ich ausprobiere, immer diese Fehlermeldung. Das Feld existiert doch. Ich verzweifle noch daran.


Wer hat dazu schon eine Lösung gefunden ?