Problema com INSERT no IBDataSet [Delphi]

Delphi

24/06/2015

[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

Curtidas 0

Respostas

Marisiana Battistella

Marisiana Battistella

24/06/2015

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

Ariel Morgan

24/06/2015

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;
GOSTEI 0
Marisiana Battistella

Marisiana Battistella

24/06/2015

Por nada Ariel!!
Obrigada pelo feedback!
GOSTEI 0
Dorivan Sousa

Dorivan Sousa

24/06/2015

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

ele gera o sql pra vc..
GOSTEI 0
POSTAR