DICAS

Visite a biblioteca de dicas da comunidade.

Saiba mais

ARTIGOS

Abordagens detalhadas sobre assuntos diversos.

Saiba mais

INICIANTES

Aprenda a programar de um modo simples e fácil.

Saiba mais

DOWNLOADS

Acesse os materiais exclusivos aos membros.

Saiba mais
voltar

PARA QUEM GOSTA DE DELPHI

Como verificar se um DataSet está em modo de Inserção ou Edição?

É necessário estar declarado DB na seção uses,
em versões unicode declare Data.DB.

Esta função retorna verdadeiro se o DataSet informado por parametro
estiver em edição ou inserção.

Abaixo segue o código fonte:

1
2
3
4
function EdicaoOuInsercao(DataSet : TDataSet) : Boolean;
begin
  Result := DataSet.State in dsEditModes;
end;

Exemplo de uso:

1
2
3
4
5
6
7
procedure TForm1.Button1Click(Sender: TObject);
begin
  if EdicaoOuInsercao(QryNotaFiscal) then
    ShowMessage('O Dataset está em edição ou inserção!')
  else
    ShowMessage('O Dataset NÃO está em edição ou inserção!')
end;

Dúvidas ou sugestões, deixe nos comentários do post.

Facebook Comments Box
  • Giovani Da Cruz
  • 11.794 views
  • 0 comentários
  • 22 de maio de 2015

Está gostando do conteúdo? Considere pagar um cafezinho para nossa equipe!

Deixe um comentário

Ir ao topo

© 2024 Infus Soluções em Tecnologia - Todos os Direitos Reservados