Localizar el codigo no utilizado en una BD

[[coso]]

hola , podrias hacer algo asi

Código Delphi [-]
// ordenar por id, si es tabla con IndexFields = 'id'
tabla.first;
id := 1;
while tabla.Locate('id',id,[]) do inc(id);

tabla.Append;
tabla.FieldValues['id'] := id;
tabla.post;