ActiveDelphi :: Exibir tópico - Generators

ActiveDelphi - Índice do Fórum

ActiveDelphi
.: O site do programador Delphi! :.

FAQ

Grupos

Registrar

Entrar e ver Mensagens Particulares

Generators

Responder Mensagem

ActiveDelphi - Índice do Fórum -> Delphi

Exibir mensagem anterior :: Exibir próxima mensagem

Autor

Mensagem

piter.galdiano
Novato
Novato

Novato

Registrado: Domingo, 21 de Março de 2010
Mensagens: 11

Enviada: Dom Abr 04, 2010 4:58 pm Assunto: Generators

Pessoal, boa tarde! Tenho um banco com os campos CODIGO --> AUTOINCREMENTO NOT NULL NOME Tenho um generators e uma trigger para alimentar o campo código Quero saber o seguinte, como faço para buscar o valor do próximo CODIGO gerado pelo generators no Delphi para colocar dentro de um DBEDIT. O Banco é firebird. Uso SimpleDataSet Grato.

Ver o perfil de Usuários

Enviar Mensagem Particular

adriano_servitec
Colaborador

Colaborador

Registrado: Sexta-Feira, 30 de Janeiro de 2004
Mensagens: 17618

Enviada: Dom Abr 04, 2010 5:03 pm Assunto:

Responder com Citação

Código:

function Tfrmcadordserv.autoinc : integer;
begin

{--------------------------------------------------}
{ autoinc com generators }
{--------------------------------------------------}
qrylocal.SQL.Text := 'SELECT GEN_ID(autoinc_numero_ordem_servico,1) FROM RDB$DATABASE';
try
qrylocal.Open;
Result := qrylocal.Fields[0].AsInteger;
qrylocal.Close;
finally
dm.connection.Commit;
end;
end;

_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree

Ver o perfil de Usuários

Enviar Mensagem Particular

Mostrar os tópicos anteriores:

	ActiveDelphi - Índice do Fórum -> Delphi	Todos os horários são GMT - 3 Horas
Página 1 de 1

Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.

Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB