Fórum Problema com INSERT no IBDataSet [Delphi] #523973

24/06/2015

0

[img:descricao=Erro]http://arquivo.devmedia.com.br/forum/imagem/435138-20150624-152954.png[/img]

ERRO: cannot modify a read-only dataset

Estou tentando mudar as tabelas de IBTable para IBDataSet, tentei com IBQuery e deu o mesmo erro:
ao criar o formulário que lista um grid com todos os registros dou um Open na tabela
procedure TFrCidades.FormCreate(Sender: TObject);
begin
  DmDados.DtaCidades.Open;
end;

ai no botão adicionar:
procedure TFrCidades.btAdicionarClick(Sender: TObject);
var
  TaCadCidades: TFrCadCidade;
begin
  DmDados.DtaCidades.Append;
  TaCadCidades := TFrCadCidade.Create(Application);
end;
Ariel Morgan

Ariel Morgan

Responder

Posts

24/06/2015

Marisiana Battistella

Em que momento ocorre esse erro?
Quando você vai abrir o formulário em execução ou quando você clica no botão adicionar?
Responder

Gostei + 0

24/06/2015

Ariel Morgan

Consegui, obrigado pela ajuda...
Pra quem está tendo esse problema utilidando IBDataSet é só adicionar valor nos campos (ModifySQL, InsertSQL, DeleteSQL)... Inseri assim:
insert into CIDADES (CODIGO, NOME, UF, PAIS, STATUS)
values (:CODIGO, :NOME, :UF, :PAIS, :STATUS)

então posso acessar pra inserir o item dessa forma
DmDados.DtaCidades.Insert;
Responder

Gostei + 0

24/06/2015

Marisiana Battistella

Por nada Ariel!!
Obrigada pelo feedback!
Responder

Gostei + 0

24/06/2015

Dorivan Sousa

com botao direito no ibdataset->database editor
botao
-select primay key
depois
-generator sql

ele gera o sql pra vc..
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar