Value af Autoinc flet efter insert af ny record

Hejsa

Jeg har en Client table hvor min primær nøgle er et AutoInc felt.
Mit problem er at jeg har brug for at vide hvilken værdi feltet blev tildelt efter at insert af ny record.


procedure TMainFrm.AcceptBtnClick(Sender: TObject);
Var BookPost :TBookmark;
begin
    Case EdType  of
    1: begin Data.UpdateClient.SQL.Text :=
          'insert into Kunder.db '+
          '(Navn, Adresse, Postnummer, City) '+
          'values '+
          '(:CNavn, :CAdresse, :CPostnummer, :CCity)';
      end;
    2: begin Data.UpdateClient.SQL.Text :=
            'update Kunder.db '+
            'set '+
            'Navn = :CNavn,Adresse = :CAdresse,
            Postnummer = :CPostnummer,
            City= :CCity                                   
            'where '+
            'Nummer = :CNummer';
      end;
    end;
      Data.UpdateClient.Params[0].Value := EdCliname.Text;
      Data.UpdateClient.Params[1].Value := EdCliAdr.Text;
      Data.UpdateClient.Params[2].Value := EdCliPost.Text;
      Data.UpdateClient.Params[3].Value := EdCliCity.Text;
          if EdType = 2 Then Data.UpdateClient.Params[4].Value := Data.Client.FieldByName('Nummer').AsInteger;
    Data.UpdateClient.ExecSQL;

Der var ikke problem med at få værdien da der blev brugt TTable, men er det meningen at hele skal køre på SQL, og det er jeg langt fra stræk i.

Håber nogen kan hjælpe