Taty,
Se você usa um generator no banco de dados, o problema está
nele. Set o generator para o número do último registro da tabela.
Abraços,
Paulo.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em
Bom dia,
Eu uso assim:
procedure TDataModule1.Incrementa(sTabela : String; fldCampo : TField);
var
qryInc : TSQLQuery;
begin
//termina a execução caso não esteja em modo de inserção
if fldCampo.DataSet.State dsInsert then Exit;
qryInc:=TSQLQuery.Create(nil);
try
with qryInc do
2 matches
Mail list logo