Application Process Message
Olá, Gostaria de esclarecer uma dúvida.
Tenho um FormPrincipal que possui uma Progress Bar. Quando clico no botão iniciar desse Form é executado um procedimento chamado Sincronizar. Só que este procedimento está em uma outra unit chamada UFunctions.
Durante o processo de sincronizar são feitos vários procedimentos e a cada procedimento eu gostaria de atualizar a Progress Bar. Para atualizar a Progress Bar eu utilizo o Application Process Messages.
Minha dúvida é exatamente essa. Utilizando a Application Process Messages na Unit UFunctions, ela vai atualizar a Progress Bar no Formulário Principal, ou o procedimento de Sincronizar teria que estar no FormPrincipal para funcionar corretamente.
Obrigado,
Marcos.
Tenho um FormPrincipal que possui uma Progress Bar. Quando clico no botão iniciar desse Form é executado um procedimento chamado Sincronizar. Só que este procedimento está em uma outra unit chamada UFunctions.
Durante o processo de sincronizar são feitos vários procedimentos e a cada procedimento eu gostaria de atualizar a Progress Bar. Para atualizar a Progress Bar eu utilizo o Application Process Messages.
Minha dúvida é exatamente essa. Utilizando a Application Process Messages na Unit UFunctions, ela vai atualizar a Progress Bar no Formulário Principal, ou o procedimento de Sincronizar teria que estar no FormPrincipal para funcionar corretamente.
Obrigado,
Marcos.
Marcosbrunato
Curtidas 0
Respostas
Onjahyr
05/03/2008
Não, não vai não...
Crie uma [b:b6d39162cc]procedure[/b:b6d39162cc] no form onde está o ProgressBar para atualização e cheme-a dessa unit, mais ou menos assim (só um exemplo):
Na realidade, não sei se atualiza, parece que não, não tenho certeza. Se sua unit estiver acrescentada no projeto talvez sim! Alguém poderia me corrigir?
Crie uma [b:b6d39162cc]procedure[/b:b6d39162cc] no form onde está o ProgressBar para atualização e cheme-a dessa unit, mais ou menos assim (só um exemplo):
procedure Atualiza(x: integer); begin ProgressBar.Progress := x; Application.ProcessMessages; end;
Na realidade, não sei se atualiza, parece que não, não tenho certeza. Se sua unit estiver acrescentada no projeto talvez sim! Alguém poderia me corrigir?
GOSTEI 0