Bom amigos, parece que essa resposta do Tiago Resolveu meu problema, no entanto, vou analizar o exemplo de thread que o jorge enviou. O Application.Processmessages também resolveu, mas se o email demora muito para ser enviado aí não rola, acho que talves se eu colocasse ele em um timer pra ficar sempre executando... fica aí as dicas para quem precisar, vou testar desempenho para ver qual é a melhor forma de deixar isso. Mas por enquando o componente idAntifreeze, resolveu legal...
Obrigado a todos. Marcelo. ----- Original Message ----- From: "tiago_econtabil" <[EMAIL PROTECTED]> To: <delphi-br@yahoogrupos.com.br> Sent: Wednesday, June 15, 2005 4:52 PM Subject: [delphi-br] Re: E-mail em massa Colega. Tem um componente na paleta Indy chamado IdAntiFreeze. Coloque ele no seu formulário e se nao me engano tem um propriedade Active. Coloque ela para True. Tive um problema parecido com esse e resolvi assim. Tiago --- Em delphi-br@yahoogrupos.com.br, "Marcelo A. Souza" <[EMAIL PROTECTED]> escreveu > Pessoal, tenho um cliente que trabalha com RH, e preciso desenvolver para ele um esquema de encaminhamento de currículos automático onde uso envio de email em massa. A rotina tá pronta, mas quando começa o envio dos e-mails o programa fica travado enquanto não acaba o processamento. Eu gostaria de dar a opção para meu usuário poder minimizar essa tela enquanto os emails estão sendo enviados e continuar usando as outras telas do sistema. Como faço isso? > > Estou usando o componente IdMessage da paleta Indy Misc e o componente IdSMTP da paleta Indy Clients do Delphi 6. Resumindo faço uma busca no meu banco de dados e carrego as informações num componente IBQuery e depois faço um loop para enviar todos os e- mails. Eu gostaria de ter a opção de cancelar o envio também, mas como nada mais fica clicável na tela, não consegui fazer isso. > > Estou precisando muito da ajuda de vocês e agradeço desde já qualquer ajuda. > > Obrigado > > Marcelo > > [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
