Problema com FDQuery.state in (dsInsert, dsEdit)

07/03/2017

0

Bom dia, a pergunta que venho fazer é bem iniciante (estou aprendendo delphi) estou seguindo a apostila da TreinaWeb para Delphi XE2, na época segui as mesmas usando compoentes DBX, só que estou tentando refazer a mesma com o Firedac, consegui conectar os componentes dbedit, sem problemas o mesmo exibe os dados, consigo avançar os registros que lancei manualmente no banco de dados Firebird (na apostila era Mysql) sem problemas mais não consigo criar o procedimento Alterar, o mesmo da erro, até consegui localizar o erro, mais não consigo resolver, o erro está no State in (dsInsert, dsEdit) acredito que o Firedac não aceita este procedimento e não sei como revolver, acredito que ele só está rerificando o estado da Tabela se está aberto para Edição ou Inserção, vou colocar o código abaixo e a mesagem de erro.

procedure TfrmFornecedor.actAlterarExecute(Sender: TObject);
begin
//Verifica se está em modo de inserção ou edição
if DMBanco.fdqryFornecedor.State in [dsInset, dsEdit] then
begin
//Se tiver atualiza o registro
DMBanco.fdqryFornecedor.Post;
//Grava as mudanças no banco de dados
if DMBanco.fdqryFornecedor.ApplyUpdates(0) = 0 then
//Informa que o registro foi gravado
ShowMessage('Registro Gravado com Sucesso!');
end;
end;

Mensagem de erro:
[dcc32 Error] uFornecedor.pas(137): E2003 Undeclared identifier: 'dsInset'
(o mesmo erro para o dsEdit)

Agradeço a atenção.
Marcelo Duarte

Marcelo Duarte

Responder

Posts

07/03/2017

Leandro Gonçalves

Declara a Unit Data.Db na uses da sua Unit.
Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

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

Aceitar