Gerando relatório

[Jerfs 1]

Quando eu clico para gerar o relatório, a exportaçãodos dados para o excel leva algum tempo, para não ficar a tela estática, teria jeito de eu colocar um tela de Generating enquanto o relatório estiver sendo gerado? Gostaria de colocar o porcentagem se possível.

[marcio.theis 3]

Tem sim, pode-se usar o componente Gauge, sem encontra na aba Samples

Podendo fazer no código algo do tipo:

 

Gauge.Visible:=True;Gauge.MaxValue:=qryTeste.RecordCount;Gauge.Progress:=0;Gauge.Refresh;qryTeste.First;while not qryTeste.Eof do	begin	//Sua programação....	Gauge.Progress:=Gauge.Progress + 1;	Gauge.Refresh;	qryTeste.Next;	end;Gauge.Visible:=False;Gauge.Refresh;

Assim a cada registro que passar ele vai atualizar a barra de progresso do Gauge...

[Jerfs 1]

E quando eu estou gerando o relatório inteiro por programação, sem o uso de querys? tem jeito de usar o gauge?

[marcio.theis 3]

Não teria como, visto que é feito a consulta no BD, retorna a consulta e visualiza, ao menos que existisse uma forma de monitorar o andamento do SQL, mas coisa que acho provavelmente não exista.

[Jerfs 1]

Tem jeito de usar o Gauge com quando se está lendo um arquivo txt? eu estou confuso no que coloco no MaxValue.

[marcio.theis 3]

Tem sim, teria somente de chegar ao final do arquivo e carregar em uma variável o número de linhas, para assim atribuir ao MaxValue.