Fórum problemas com append (clientDataSet) #391830
04/12/2010
0
_osw
Curtir tópico
+ 0Posts
04/12/2010
Alex Bahiano
Gostei + 0
06/12/2010
_osw
procedure TfrmCaixaLancto.btnNovo_nClick(Sender: TObject);begin if gRegistro = EmptyStr then Begin MessageDlg('Por Favor, Escolha um Caixa/Banco para trabalhar!',mtInformation,[mbOk],0); Exit; end;
DM.cds_Caixa_lancto.Cancel; DM.cds_Caixa_lancto.Append; grpDados_Lancamentos.Enabled := True; HabilitaCampos(True); dbchkExporta_contabilidade.Checked := True;
btnSeleciona.Enabled := False; btnNovo_n.Enabled := False; btnSalvar_n.Enabled := True; btnCancelar_n.Enabled := True; btnEditar_n.Enabled := False; btnExcluir_n.Enabled := False; btnImprimir_n.Enabled := False; btnSair_n.Enabled := True; grdDados.Enabled := False;
dbeDocumento.SetFocus;
end;
Gostei + 0
07/12/2010
Wilson Junior
Espero ter colaborado.
Gostei + 0
07/12/2010
_osw
Já tentei usar o insert e o problema persiste.
Grato pela ajuda!
Gostei + 0
07/12/2010
Alex Bahiano
veja ai e me fale.
Gostei + 0
07/12/2010
Junior Miranda
Já tentei usar o insert e o problema persiste.
Grato pela ajuda!
Bom dia
Comente tudo! Deixando apenas, a abertura e o fechamento do clientdataset, o grid ligado ao datasource (nada de eventos!) e o código referente ao botão novo! Testa! Funcionou? Então vai retirando gradativamente os comentários e testando. Isso é uma forma de tentarmos descobrir, o que está ocorrendo.
[]'s
Gostei + 0
09/12/2010
_osw
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)