Auto Incremento

[Halan Lopes]

Estou com problema em um campo de Numeração Automática, quando entro um registro ele não inicia do 1! Como faço para fique em sequencia ex.: 1,2,3,...?

[Kikonanet]

Olá,

No Banco Access, o Campo está como Auto Incremento?

qualquer coisa posta ae.

Abs.

Kiko

[Halan Lopes]

sim está declarado como auto incremento! Quando entro dados direto pelo access ele cria na sequencia mas quando entro pelo programa gerado no delphi ele não cria na sequencia, a conecção da minha tabela é feita por um DataBase! você pode me dizer o que faço pra registrar em sequencia?

[Kikonanet]

Olá Halan,

Uso ADO quando uso Access sempre que incluo um registro, automaticamente, ele gera o autroincremento na sequencia!

Posta ae como você esta fazendo!

Abs.

Kiko

[Halan Lopes]

Tentei mudar pra ADO mas começou a aparecer erros vamos por parte primeiro erro foi esse:

Invalid Variant type conversion

acho que esta referente ao campo que soma os valores de uma coluna com esse comando

procedure TfrmPedido.Button1Click(Sender: TObject);

var vTotal : Real;

begin

vTotal := 0;

ADOTable2.First;

while not ADOTable2.Eof do begin

  vTotal := vTotal + ADOTable2.FieldByName('Total').Value;

  ADOTable2.Next;

end;

Edit1.text := FormatFloat('0.00',vTotal);

end;

O que sera que esta errado?

[Kikonanet]

Olá Halan,

Tenta usar:

ADOTable2.FieldByName('Total').AsFloat

Abs.

Kiko

[Halan Lopes]

continua o mesmo erro!

[Halan Lopes]

Encontrei o problema estava em outra procedure que recebia o valor dessa! OBRIGADO PELA AJUDA!