| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
pierrej
Novato
Registrado: Sábado, 16 de Agosto de 2014
Mensagens: 83
|
 Enviada: Qui Jul 16, 2015 4:49 pm Assunto: Splash ao gerar relatórios |
 |
|
Boa tarde Galera!
Precisava saber como fazer um Form de Splash enquanto eu estou gerando um relatório.
Alguém ai pode me ajudar? |
|
| Voltar ao Topo |
|
 |
LukkasDolberth
Aprendiz
Registrado: Terça-Feira, 9 de Julho de 2013
Mensagens: 190
|
| Enviada: Qui Jul 16, 2015 9:53 pm Assunto: Re: Splash ao gerar relatórios |
|
|
| pierrej escreveu: | Boa tarde Galera!
Precisava saber como fazer um Form de Splash enquanto eu estou gerando um relatório.
Alguém ai pode me ajudar? |
Boa noite...
A "receita do bolo" é mais ou menos assim...
[*]Crie um novo form
[*]Ajuste a propriedade BorderStyle desse form para bsNone
[*]Ajuste o tamanho e outros detalhes desse form como desejar
[*]Eu costumo ajustar a propriedade Position para poMainFormCenter ou poDesktopCenter.
[*]Se quiser ter uma mensagem nesse form, inclua um TLabel para isso.
[*]Vá em Project/Options/Forms e remova esse form da lista de Auto-create forms
Para usar a janela de splash/progresso:
var FSplash: TSeuFormDeSplash;
| Código: | procedure MontarRelatorioDeVendas;
begin
try
FSplash := TSeuFormDeSplash.Create(nil);
FSplash .show;
while ....//Aqui, algum processamento, como percorrer uma query por ex.
begin
processamento...
end;
finally
Free(FSplash)
end;
end; |
Enfim, existem N formas de vc fazer isso, espero que lhe ajude. Valeu, abraço. |
|
| Voltar ao Topo |
|
|
pierrej
Novato
Registrado: Sábado, 16 de Agosto de 2014
Mensagens: 83
|
| Enviada: Sex Jul 17, 2015 1:08 pm Assunto: |
|
|
| Obrigado pela ajuda Fera, mas o formulário só aparece com o showmodal e usando o showmodal ele não fecha o formulário. |
|
| Voltar ao Topo |
|
|
johnny-walker
Moderador
Registrado: Sábado, 4 de Outubro de 2003
Mensagens: 10653
Localização: Contagem/MG - BRAZIL
|
| Enviada: Sex Jul 17, 2015 9:01 pm Assunto: |
|
|
É porque showmodal ele espera uma resposta e enquanto esta resposta não vem ele não prossegue para a linha posterior, neste caso utilize um timer para fechar o formulário.
bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I |
|
| Voltar ao Topo |
|
|
pierrej
Novato
Registrado: Sábado, 16 de Agosto de 2014
Mensagens: 83
|
| Enviada: Sex Jul 17, 2015 10:51 pm Assunto: |
|
|
| Pode me ajudar com o código? |
|
| Voltar ao Topo |
|
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
