Fórum Como pegar ultimo ítem do banco? #203675
30/12/2003
0
estou fazendo um sistema com segue por uma coluna ID/Código.
Então, como eu poderia saber o valor da ultima linha do banco pra pegar esse ID e somar mais 1 para continuar a gravar e sempre ir adicionando?
Ps.: Tipo a função autoincrement em especial não me serve nesse caso.
Obrigado
Lipsil
Curtir tópico
+ 0Posts
30/12/2003
Felipemarinho
uma deles é a seguinte
Nome_Da_Tabela.last (com ess comando vc coloca a tabela no último registro)
VARIAVEL_QUE_IRA_RECEBER_O_CODIGO := NOME_DA_TABELA_CAMPO_DA_TABELA.ASITERGER +1
a OUTRA MANEIRA QUE É MAIS RÁPIDA POIS USA SQL
VC PEGA UMA QUERY E NA PROPRIEDADE ´SQL´ DIGITE O SEGUINTE
SELECT MAX(NOME_DO_CAMPO_PARA_INCREMENTAR) CODIGO
FROM NOME_DA_TABELA
DEPOIS INSIRA ESTE CÓDIGO
Query.Close;
Query.open;
nome_da_variavel := Query.FieldByName(´CODIGO´).AsInteger +1;
Pronto já esta pronto seu auto_increment
obs não se esqueça de configurar a query igual vc configura uma table, ou seja associando uma data base
Gostei + 0
31/12/2003
Lipsil
É ISSO AÍ MESMO...
só q agora, como faço pra converter isso pra colocar num edit?
Valew
Gostei + 0
31/12/2003
Maicongabriel
var iCodigo : Integer; begin Query.SQL.Clear; Query.SQL.Text := ´SELECT MAX(NOME_DO_CAMPO_PARA_INCREMENTAR) CODIGO FROM NOME_DA_TABELA´; Query.Close; Query.Open; iCodigo := Query.FieldByName(´CODIGO´).AsInteger +1; Edit1.Text := IntToStr(iCodigo); end;
[i:faaa68057a]O codigo foi escrito de uma maneira simples e pode ser otimizado...[/i:faaa68057a]
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)