Problema con autoincremento!!

[magnu9]

Saludo cordial a todo el foro. mi problema radica en un autoincremento de mis del Id ejemplo de clientes. Al crear un nuevo cliente su Id se autoincremente al anterior. Osea si tengo 20 clientes, al crear el siguientes seria le 21. Alguien me diò una idea es la siguientes.

sqlClientes.sql.text:= ´Select max(CodCli) from clientes´;
inext:= "una funcion que me tome el valor integer"(sqlclientes.sql.text);

Al observar no esta mala la idea, pero no se concretarla, no se si alguien me podria ayudar a crear esa funcion. Y un poco detallada la respuesta osea en que procedure debo llevarlas. Bueno espero en Dios me entiendan.

De antemano un millon de gracias, de exponer su preciado tiempo en todo lo que les solicitamos sus ayudas.