try Screen.Cursor := crHourGlass;
{ gera o relatório }
finally
Screen.Cursor := crDefault;
end;
Isso não ajuda?
2009/4/28 Bruno Lepesqueur <brunolbra...@yahoo.com.br>
>
>
> Boa noite pessoal!
>
> Eu criei um botão que executa o relatório de clientes, mas até que o
> relatório carregue demora uns 50 segundos e às vezes dá impressão que o
> sistema travou!
> Tem como ele exibir uma lupa ou o percentual na tela enquanto o relatório
> estiver sendo processado?
> Dessa forma o usuário saberá que o relatório está terminando de ser
> concluído e aguardará numa boua!
>
> Obrigado!
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
[As partes desta mensagem que não continham texto foram removidas]
