> Gostaria de saber se tem um jeito melhor, pois desse jeito eu não consegui
> pegar o ultimo incremento
Uma idéia seria abaixo, claro que sempre dentro da mesma transação... (Ignore
TBusinessObject, substitua por uma TIBQuery)
function TCustomDatamodule.GetLastID(FieldName, TableName: String)
Caso vc use o firebird 1.5 vc pode fazer o sequinte SQL
select RDB$GENERATOR_NAME,RDB$GENERATOR_ID
from RDB$GENERATORS
where RDB$GENERATOR_NAME=''
assim vc pegara com o nome do generator o valor passando como parametro o
nome do generator
select RDB$GENERATOR_NAME,RDB$GENERATOR
; Date: Mon, 28 Jan 2008 22:07:01 -0300
> Subject: Re: [delphi-br] Ultimo registro incrementado...
>
>
> Amigo... tô sem Delphi aqui, mas uma solução bem logica seria fazer uma
> query no banco (usando TIBSQLQuery, por ex.) com uma sentença tipo :
>
> [code]
>
usar com RDB$DATABASE, pois é uma tabela de uso pelo
catálogo do banco que SEMPRE terá um único registro.
Sds.
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Tue, 29 Jan 2008 01:13:00 +
Subject: RE: [delphi-br] Ultimo registro incrementado
terá um único registro.
Sds.
> To: delphi-br@yahoogrupos.com.br
> From: [EMAIL PROTECTED]
> Date: Mon, 28 Jan 2008 22:07:01 -0300
> Subject: Re: [delphi-br] Ultimo registro incrementado...
>
>
> Amigo... tô sem Delphi aqui, mas uma solução b
Amigo... tô sem Delphi aqui, mas uma solução bem logica seria fazer uma query
no banco (usando TIBSQLQuery, por ex.) com uma sentença tipo :
[code]
Select GEN_ID(, 0)
>From
[/code]
Que traz o valor atual do Generator.
Atte,
Ricardo.
Ricardo Mendes <[EMAIL PROTECTED]> escreveu:
6 matches
Mail list logo