Erro cannot perform this operation on a closed dataset delphi
Estou com esse erro quando verifico se já existe um registro salvo pra não salvar registro igual. Segue o trecho do código abaixo:
function TfrmRotaCte.ExisteChave: Boolean;
begin
DM.oCad133.IndexName := 'Ind133';
DM.oCad133.Refresh;
Result := DM.oCad133.FindKey([ Trim(Copy(ComboBoxCteOrigem.Text,1,2)), Trim(Copy(ComboBoxCteDestino.Text,1,2)) ]); //Debuguei e o erro é nessa linha.
Se alguém puder me ajudar, obrigado.
function TfrmRotaCte.ExisteChave: Boolean;
begin
DM.oCad133.IndexName := 'Ind133';
DM.oCad133.Refresh;
Result := DM.oCad133.FindKey([ Trim(Copy(ComboBoxCteOrigem.Text,1,2)), Trim(Copy(ComboBoxCteDestino.Text,1,2)) ]); //Debuguei e o erro é nessa linha.
Se alguém puder me ajudar, obrigado.
Matheus Gomes
Curtidas 0
Respostas
William
28/08/2015
Essa mensagem informa que o DataSet que você está chamando ainda não foi aberto!
GOSTEI 0
Matheus Gomes
28/08/2015
Estou abrindo o dataset quando instancio o form, no evento FormCreate
GOSTEI 0
Raimundo Pereira
28/08/2015
function TfrmRotaCte.ExisteChave: Boolean;
begin
DM.oCad133.open;
DM.oCad133.IndexName := 'Ind133';
DM.oCad133.Refresh;
Result := DM.oCad133.FindKey([ Trim(Copy(ComboBoxCteOrigem.Text,1,2)), Trim(Copy(ComboBoxCteDestino.Text,1,2)) ]); //Debuguei
begin
DM.oCad133.open;
DM.oCad133.IndexName := 'Ind133';
DM.oCad133.Refresh;
Result := DM.oCad133.FindKey([ Trim(Copy(ComboBoxCteOrigem.Text,1,2)), Trim(Copy(ComboBoxCteDestino.Text,1,2)) ]); //Debuguei
GOSTEI 0