ID nicht gefunden nach last_insert_rowid()

[nahpets]

Einen hätt' ich noch:

Delphi-Quellcode:

qMain.SQL.Text := 'SELECT max(ID) as ID from KONTAKTE';
qMain.Open;
if qMain.RecordCount > 0 then begin
  currentID := qMain.Fields[0].AsString;