RECORD COUNT - DELPHI 7

Delphi

24/08/2015

Bom dia!

Pessoal, to com uma dúvida... Uso tal verificação se existe ou não dados à serem exibidos em uma consulta:

procedure TFrmVendedores.BtnClientesClick(Sender: TObject);
begin
  If DtmDados.QrVendedores.RecordCount = 0 Then
  begin
    Erro( 'O banco de dados está vazio.' );
    DbVendedores.SetFocus;
    Abort;


Se deixo essa verificação, dá erro dizendo que não há dados (e existem milhares de dados a serem exibidos) e aborta o processo como visto acima, mas se deixo em comentário ou apago a sintaxe, aparece normalmente!!

A dúvida é: Pq?! rsrsrss, não faz sentido

Lembrando que não há erros de sintaxe.

Qualquer opinião ajuda. Até então, Obrigado!
Lourival Rocha

Lourival Rocha

Curtidas 0

Melhor post

Misterzire

Misterzire

24/08/2015

Tenta com esse comando ao invés do RecordCount
If DtmDados.QrVendedores.RecordCount.IsEmpty
GOSTEI 1

Mais Respostas

Lourival Rocha

Lourival Rocha

24/08/2015

Achei o erro cara, aí eu estava indicando que a Query estava no Data Module, mas a bendita estava no form =D

De qualquer forma, obrigado!!
GOSTEI 0
POSTAR