Ir para conteúdo
Fórum Script Brasil
  • 0

erro ao salvar cadastro


Ronaldo Lanhellas

Pergunta

12 respostass a esta questão

Posts Recomendados

  • 0

Botão Salvar:

procedure TFrmModelo.Ac_SalvarExecute(Sender: TObject);

begin
  if Fields(DS) and (DS.State in [dsEdit, dsInsert]) then
  begin
  if MessageDlg(MSG_SALVAR, mtInformation, [mbOK], 0) = mrOk then
  TClientDataSet(Ds.DataSet).ApplyUpdates(0);
//  PageControl1.ActivePage := tbConsulta;
  end;
end;

Link para o comentário
Compartilhar em outros sites

  • 0

Mas existe um ClientDataSet num form... se esse form estiver aberto você deve usar ele pelo menos pra fazer um teste pois assim vamos saber se esse seu typecast não tá ferrando com o código... tenta aí:

FrmTeste.CdsTeste.ApplyUpdates(0);

Abraços

Link para o comentário
Compartilhar em outros sites

  • 0

assim não tem como eu fazer um FrmUsuarios.CdsUsuarios.ApplyUpdates(0); pois apenas tenho o DataSource no meu form e não o clientdataset, o clientdataset está no meu DataModule, separado, seu eu fizer como você falou da UNDECLARED, porém se eu por DM.cdsUsuarios.ApplyUpdates(0);

tentei assim: DM.cdsPastores.ApplyUpdates(0);

porem o erro continua

Editado por Ronaldo Lanhellas
Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...