ADOQuery INSERT und Select

[Nico B.]

Auch wenn dieser Thread schon sehr alt ist, möchte ich doch noch eine Lösung für das Problem posten. Denn ich hatte das selbe Problem und bin bei meiner Lösungssuche über diesen Thread gestolpert.

Delphi-Quellcode:

//INSERT-Anweisung
ADOQUERY.Close;
ADOQUERY.SQL.Clear;
ADOQUERY.SQL.Add('INSERT INTO....');
ADOQUERY.ExecSQL; 

//Abfrage des Autowerts
ADOQUERY.Close;
ADOQUERY.SQL.Clear;
ADOQUERY.SQL.Add('SELECT @@IDENTITY AS ID');
ADOQUERY.ExecSQL; 
ADOQUERY.Open;
ADOQUERY.First;
ID:=ADOQUERY.FIELDBYNAME('ID').AsInteger;