ESSA É FÁCIL , MAS NÃO ESTOU CONSEGUINDO FAZER
Galera,
Como fazer para armazenar registros de uma tabela como: 001 , 002 , 003 ........ em um combobox en vez de usar dbedit e os mesmos fossem criados em sequencia a cada inclusão de um novo registro tipo alto incremento.
Da uma força galera.
Como fazer para armazenar registros de uma tabela como: 001 , 002 , 003 ........ em um combobox en vez de usar dbedit e os mesmos fossem criados em sequencia a cada inclusão de um novo registro tipo alto incremento.
Da uma força galera.
Anonymous
Curtidas 0
Respostas
Dor_poa
23/02/2003
var
Controle: Integer;
begin
tabela.last; //vai para oi ultimo ref.
controle := tabelaCAMPO.asinteger + 1; // pega o ultimo numero e armazena na variavel..
pronto... agora o proximo nº sera Controle...
Se quiser lancar no banco use isto
tabelacampo.asinteger := controle
Inc(controle) // atualiza para oproximo codigo
end;
Controle: Integer;
begin
tabela.last; //vai para oi ultimo ref.
controle := tabelaCAMPO.asinteger + 1; // pega o ultimo numero e armazena na variavel..
pronto... agora o proximo nº sera Controle...
Se quiser lancar no banco use isto
tabelacampo.asinteger := controle
Inc(controle) // atualiza para oproximo codigo
end;
GOSTEI 0