Fórum Ultimo Registro da tabela Delphi #416752

14/05/2012

0

Boa Noite,

Tenho esse código que é colocado no evento Activate de um form(Ao abrir o form quero que ele abra para inserir um novo registro)mais ele não esta indo para o ultimo esta indo para o registro de Nº 52, quero que ele vá para o 81(pois tem 80 registro inseridos)
var
prox:integer;
begin
frmdados.ADOTable1.Last;
prox:=frmdados.ADOTable1.fieldbyname(código).
asInteger +1;
frmdados.ADOTable1.Append;
frmdados.ADOTable1.fieldbyname(código).
asinteger:=prox;
Dbedit4.SetFocus;
end;


Obs:Banco de dados access.O campo código está definido como chave primária.


[]s
Magnata Gold

Magnata Gold

Responder

Posts

15/05/2012

Bruno Leandro

o problema deve estar ocorrendo por causa da ordenação dos registros, tente criar um index no campo que voce quer ordenar e informe esse indece na propriedade indexname do componente.
Responder

Gostei + 0

15/05/2012

Magnata Gold

Ok

Estarei tentando aki


[]s
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar