SAMW

Muito obrigado pela ajuda e espero poder colaborar bastante com todos no que vocês precisarem também acabei nem precisando ler o artigo eu apenas retirei a linha: Banco.IBTableAUTOR.ApplyUpdates; // aplicar atualização nos registros deixando assim: INSERIR: begin Banco.IBTableAUTOR.Last; // ultimo registro da tabela Banco.IBTableAUTOR.Append; // inserir novo registro Banco.IBTableAUTOR.Edit; // modo de Edição do registro ultcod := Banco.IBTableAUTORCODIGO_AUTOR.value+1; Banco.IBTableAUTORCODIGO_AUTOR.value := ultcod; end; SALVAR: begin Banco.IBTableAUTOR.Post; // gravar o registro end; e consegui resolver todos os meus problemas obrigado mesmo pela ajuda e se precisarem de algo podem contar comigo!!!

Boa noite desculpa a minha demora pra responder mas estava acertando os códigos a minhas necessidades mas ainda estou com um problema e se puderem me ajudar eu agradeço muito eu clico em novo e coloco o codigo: begin Banco.IBTableAUTOR.Last; // ultimo registro da tabela Banco.IBTableAUTOR.Append; // inserir novo registro Banco.IBTableAUTOR.Edit; // modo de Edição do registro ultcod := Banco.IBTableAUTORCODIGO_AUTOR.value+1; Banco.IBTableAUTORCODIGO_AUTOR.value := ultcod; end; e no botão salvar o código: begin Banco.IBTableAUTOR.Post; // gravar o registro Banco.IBTableAUTOR.ApplyUpdates; // aplicar atualização nos registros end; no botão novo tá tranquilo mas quando eu clico em salvar me da a seguinte mensagem: " CachedUpdates not enabled " se alguém puder me ajudar eu agradeço

Boa tarde eu estou trabalhando com os componentes da palheta qreport se você tb estiver utilizando essa palheta é só você adicionar o componente TQRExcelFilter que na hora de salvar o seu relatório ele vai dar a opção de colocar no formato pro execel qualquer duvida posta

Boa tarde muito obrigado pela ajuda mas ainda não resolveu o problema na linha Banco.IBTableAUTOR.ApplyUpdates(-1); // aplicar atualização nos registros ele da um erro na parte em destaque se eu rodo ele sem essa parte ele compila mas no segundo registro ele já da um erro de cache e o código que eu tinha passado era para o botão inserir tem como dividir esse comando para colocar uma parte no inserir e a outra no salvar??? desde já muito obrigado mesmo pela ajuda

Bom dia pessoal estou precisando de uma ajuda meio urgente se alguém puder me ajudar eu agradeço muito, estou criando um projeto no Delphi 2007 e utilizando Interbase 10 como banco de dados. Meu problema é o seguinte pelo banco de dados eu consigo inserir inumeros registros nas tabelas mas quando eu coloco no delphi ele não deixa eu colocar a tabela em modo de execução estou utilizando os componentes IBDatabase, IBTransaction, IBTable da palheta do interbase Aqui está o código para o botão de inserção: Banco.IBTableAUTOR.Insert; if Banco.IBTableAUTOR.State in [dsInsert] then begin Banco.IBTableAUTOR.Last; ultcod := Banco.IBTableAUTORCODIGO_AUTOR.value+1; Banco.IBTableAUTORCODIGO_AUTOR.value := ultcod; end; O problema é que quando eu clico nesse botão ele me da a seguinte mensagem: " not in edit mode " já tentei utilizar no lugar dessa linha: Banco.IBTableAUTOR.Insert; essa: Banco.IBTableAUTOR.Append; mas tb não resolveu o problema continua dando a mesma mensagem se alguém puder me ajudar eu agradeço mesmo pela atenção