Problemas ao excluir - Tabela Paradox
Saudações amigos.
Excluir este registro está me dando um trabalho.
Segue abaixo a rotina problemática :
if DM.TBreciclar.Findkey([´GP´]) then begin
DBcodgrupo.Text:=inttostr(DM.TBreciclar.Fieldbyname(´CODIGO´).Value);
DM.DTreciclar.DataSet.Delete; //-> Linha do erro.
O problema é o seguinte : Quando a linha do erro é executada uma mensagem de erro é mostrada
Index is read only.
Os arquivos não estão com parametros somente para leitura.
Alguém pode me ajudar ?
Agradeço desde já
Rogério
Excluir este registro está me dando um trabalho.
Segue abaixo a rotina problemática :
if DM.TBreciclar.Findkey([´GP´]) then begin
DBcodgrupo.Text:=inttostr(DM.TBreciclar.Fieldbyname(´CODIGO´).Value);
DM.DTreciclar.DataSet.Delete; //-> Linha do erro.
O problema é o seguinte : Quando a linha do erro é executada uma mensagem de erro é mostrada
Index is read only.
Os arquivos não estão com parametros somente para leitura.
Alguém pode me ajudar ?
Agradeço desde já
Rogério
Rogerio
Curtidas 0
Respostas
Aroldo Zanela
15/04/2003
Rogério,
Caso alguém que use Paradox não dê uma solução mais adequada, tente o seguinte:
Vá em www.bdesupport.com (caso não tenha ainda) e que um utilitário de reparaçào de tabelas. Aplique sobre suas tabelas, para termos a certeza da integridade dos índices.
Se não funcionar, me passa a tabela com os índices para verificar ´in loco´.
Caso alguém que use Paradox não dê uma solução mais adequada, tente o seguinte:
Vá em www.bdesupport.com (caso não tenha ainda) e que um utilitário de reparaçào de tabelas. Aplique sobre suas tabelas, para termos a certeza da integridade dos índices.
Se não funcionar, me passa a tabela com os índices para verificar ´in loco´.
GOSTEI 0
Marconi
15/04/2003
Se o index é ReadOnly, será que não está dando erro quando o BDE tenta atualizar o index ???
Espero ter ajudado
Marconi
Espero ter ajudado
Marconi
GOSTEI 0
Marconi
15/04/2003
Se bem que se fosse este o caso você não conseguiria nem colocar novos dados na tabela.
Veja os atributos dos arquivos de index que tem a extensão .px e py.
Espero ter ajudado
Marconi
Veja os atributos dos arquivos de index que tem a extensão .px e py.
Espero ter ajudado
Marconi
GOSTEI 0
Rogerio
15/04/2003
Se bem que se fosse este o caso você não conseguiria nem colocar novos dados na tabela.
Veja os atributos dos arquivos de index que tem a extensão .px e py.
Espero ter ajudado
Marconi
Obrigago pela resposta.
Eu verifiquei os índices e os e a tabela em si. Estão todos normais.
Esta tabela eu havia acabado de criar e então para usar nesta parta do programa. Mas não consigo deletar o registro sem que o erro aconteça.
Será que você tem mais alguma dica ?
Obrigado
Rogério
GOSTEI 0
Aroldo Zanela
15/04/2003
Rogério,
Faça o seguinte:
Feche sua aplicação ou aplicaçòes que efetuam acesso a referida tabela;
Abra o SQL Explorer e abre o alias de sua aplicação;
Clique sobre a tabela e em seguida na aba [b:1695a3d370]data[/b:1695a3d370];
Tente excluir o registro por meio do dbNavegator (canto superior direito) e veja se algum erro é apresentado.
Faça o seguinte:
Feche sua aplicação ou aplicaçòes que efetuam acesso a referida tabela;
Abra o SQL Explorer e abre o alias de sua aplicação;
Clique sobre a tabela e em seguida na aba [b:1695a3d370]data[/b:1695a3d370];
Tente excluir o registro por meio do dbNavegator (canto superior direito) e veja se algum erro é apresentado.
GOSTEI 0
Adilsond
15/04/2003
if DM.TBreciclar.Findkey([´GP´]) then
begin
DBcodgrupo.Text:= DM.TBreciclar.Fieldbyname(´CODIGO´).AsString;
DM.DTreciclar.Delete;
end;
begin
DBcodgrupo.Text:= DM.TBreciclar.Fieldbyname(´CODIGO´).AsString;
DM.DTreciclar.Delete;
end;
GOSTEI 0