[lucasarts_18]

Agrego algo, la consulta SQL debería ser así

Código SQL [-]
select count(noEmp)+1 as cont from empl;

y despues en delphi.

Código Delphi [-]
NombreVariable := NombreDataSet.FieldByName('cont').Value;

Hasta Luego .-