Contagem de Registro numa Query

Delphi

05/04/2018

Boa noite!
Alguém pode me ajudar?
Quando faço um SELECT * FROM TBL_LOCAL, através de uma Query (Sql_local), todos os 175 registros aparecem na DBGrid, porém quando tento mostrar estes mesmos registros numTLabel, através do seguinte comando: TLabel.caption:= intostr(Sql_local.Recordcount), só aparecem 50 registros.
Será algum Bug no Delphi Xe8 ou alguma limitação em uma configuração?

Uso o FireDac do Delphi Xe8.
Agradeço, desde já.
Adailso Cosme

Adailso Cosme

Curtidas 0

Melhor post

Raimundo Pereira

Raimundo Pereira

06/04/2018

begin
close;
sql.Clear;
sql.Add('select * from tbl_local');
open;
fatchall;
GOSTEI 2

Mais Respostas

Adailso Cosme

Adailso Cosme

05/04/2018

Esta é a query que busca os registros:

with Sql_Local do
begin
close;
sql.Clear;
sql.Add('select * from tbl_local');
open;
end;

Tlabel.caption:= inttostr(Sql_Local.Recordcount);
GOSTEI 0
Carlos Natividade

Carlos Natividade

05/04/2018

Boa tarde.
O objeto ADQuery possui uma propriedade: FetchOptions => RecordCountMode
Geralmente ela fica como cmVisible, experimente colocar cmTotal.
GOSTEI 0
Adriano

Adriano

05/04/2018

coloca um cm total.
GOSTEI 0
Adailso Cosme

Adailso Cosme

05/04/2018

Valeu.
Fiz um Fetchall em tempo de execução e deu certo. O fireDac bão tinha a propriedade que vc mencionou. Contudo vc me ajudou..
GOSTEI 0
POSTAR