ClienteDataSet.ApplyUpDates(-1)??????

Delphi

01/02/2005

:D Boa Tarde!

Eu tenho este codigo:
________________
If DModule.ClienteDataSet(´Cod_Fornecedor´).AsInteger<>0) and
(Length(DModule.ClienteDataSet(´Nom_Fronecedor´).AsString<>0) then
Begin
DModule.ClienteDataSet.ApplyUpDates(-1);
end else
begin
ShowMessage(........);
___________________

O que acontece e o seguinte, eu digito todos os dados clico no Btn Confirma, ele aparece no DBGrid, ai vou dar outra entrada, ele abre uma linha entre dois registro :shock: em vez de ir para a ultima linha, e quando clico em confirma ele da erro de chave primaria :shock: , e nao grava nem um nem outro. :?
O que eu fiz de errado?? :oops:
Obrigado pela dica!


Marcelo_j.

Marcelo_j.

Curtidas 0

Respostas

Rômulo Barros

Rômulo Barros

01/02/2005

Ok.. deu pra entender o q vc quer. Vc apenas [b:6dbcb591bf]esqueceu [/b:6dbcb591bf]de informar qual é ´exatamente´ o erro que ocorre.


GOSTEI 0
Marcelo_j.

Marcelo_j.

01/02/2005

Boa Tarde.

O erro que ocorre e Violação chave primaria.

Tipo duplicação de campo chave primaria, e quando vou inserir um novo registro ele abre uma linha no meio dos regitros do DBGrid, e não na ultima linha!

Sera que deu para entender???

Obrigado.


GOSTEI 0
Marcelo_j.

Marcelo_j.

01/02/2005

Boa tade!
Desculpem minha ignorancia, consegui consertar o que estava errado. :oops:

O problema era que euiu tinha feito um indice unico no campo CNPJ e não estava inserindo dados neste campo, por isso no segundo registro com o campo cnpj vazio dava a mensagem de erro. :oops:

Desculpem minha ignorancia e obrigado.


GOSTEI 0
Rômulo Barros

Rômulo Barros

01/02/2005

Que bom q vc resolveu o problema !!!! :wink:


GOSTEI 0
POSTAR