InsertId : Integer
Ключ последней добавленной записи.

Функция возвращает значение поля счетчика последней добавленной в базу данных записи. Записи добавленные другими клиентами базы данных не учитываются. Если в последней добавленной записи не было поля счетчика, то функция возвращает 0, иначе функция возвращает положительное число больше нуля.

Эта функция может работать некорректно, если используются триггеры в которых выполняется запрос Insert. Это зависит от используемой базы данных.

Пример:

Procedure OnCreate; 
Var
  CountryCode : Integer; 
Begin                                             
  Query('Insert Into Country(Name) Values(''Россия'')');
  CountryCode := InsertId; 
  Warning('CountryCode = ' + ToStr(CountryCode));
End;

Команды Insert и ModifyTable возвращает идентификатор добавленной записи, поэтому при работе с ними функция InsertId не требуется.

Пример:

Procedure OnCreate; 
Var
  CountryCode : Integer; 
  CountryName : String;
Begin                    
  CountryName := 'Россия';
  CountryCode := (Insert Into Country(Name) Values(:CountryName));
  Warning('CountryCode = ' + ToStr(CountryCode));
End;

Пример SQL:

Select InsertId()

© RTIT