adotable

[guilhermerayol]

:D:D:D

alo tenho aqui dois forms e estou usando adotable

no primeiro tenho duas tabelas

com a tabela 1(acess) retiro os dados necessarios

a:=adotable1.fieldbyname('a').asinteger;

b:=adotable1.fieldbyname('b').asinteger;

c:=adotable1.fieldbyname('c').asinteger;

d:=adotable1.fieldbyname('d').asinteger;

realizo operações com os dados e coloco em um vetor

vetor(a,b,c,d,e)

entro com os valores na segunda tabela da seguinte maneira

adotable2.append;

adotable2.fieldbyname(campo1).value:=v[1];

adotable2.fieldbyname(campo2).value:=v[2];

adotable2.fieldbyname(campo3).value:=v[3];

adotable2.fieldbyname(campo4).value:=v[4];

adotable2.fieldbyname(campo5).value:=v[5];

adotable2.post;

aqui aparece o primeiro problema que é o campo autonumeravel da tabela dois

se definir uma chave primaria o delphi emite erro ou o campo fica em branco.

se deixar sem chave funciona

agora quero abrir essa segunda tabela em um segundo formulario

como é que se faz isso porque a tabela pode estar vazia ou então tenho qu

que limpar os registros com o seguinte codigo

para a tabela1

button1

begin

while adotable1.recordcount>0 then

begin

adotable1.delete;

end;

end;

o delphi emite erro de indice ou chave primaria (da segunda tentativa de

apagar os dados

no form2 quero atualizar os valores da tabela1 .

da pra falar como?

o botao limpar de uma terceira tabela no form2 ocorre a mesma mensagem

de erro de indice ou chave. valeu