email com anexos ( indy 10 )

Delphi

12/10/2006

alguem saberia como enviar um arquivo em anexo num email usando indy 10 ???


Mahdak

Mahdak

Curtidas 0

Respostas

Ffc

Ffc

12/10/2006

// Percorre a combobox para pegar todos os anexos.
[b:dbc4dce297] for[/b:dbc4dce297] I := 0 [b:dbc4dce297]to[/b:dbc4dce297] ComboBox1.Items.Count - 1 [b:dbc4dce297]do[/b:dbc4dce297]
[b:dbc4dce297]begin[/b:dbc4dce297]
TIdAttachment.Create(IdMessage.MessageParts, ComboBox1.Items.Strings[I]);
[b:dbc4dce297]end;[/b:dbc4dce297]

Nesta combobox vou jogando os anexos.
Ex:
c:\teste.txt
c:\novo.bmp

Espero ter contribuido.


GOSTEI 0
Mahdak

Mahdak

12/10/2006

voce testou isso com indy 10? pq parece que o pessoal nao tem conseguiso fazer da mesma maneira que era feitos com as versoes anteriores...

outra coisa, troquei de computador, antes eu tinha um celeron 32 bits, agora estou com um sempron 64 bits, formatei a maquina instalei o delphi e quando fui compilar meu projeto que antes compilava normalmente olha a mensagem de erro:

[Pascal Fatal Error] Unit1.pas(7): F2051 Unit IdIOHandler was compiled with a different version of IdComponent.TIdComponent


sabe como eu poderia resolver isso? antes eu usava o mesmo delphi, com a mesma versao do indy... ou seja, Turbo e indy 10


GOSTEI 0
Ffc

Ffc

12/10/2006

Amigo infelizmente estou usando o 9.0.18, lembro que tive problemas com o Indy 10 e acabei retornando para o 9.0.18 que não tive problemas até agora.

abraços.


GOSTEI 0
Mahdak

Mahdak

12/10/2006

entao, ja instalei a versao 9 , porem continuo com o problema:

[Pascal Fatal Error] SIGAX.dpr(24): F2051 Unit IdSMTP was compiled with a different version of IdComponent.TIdComponent.BeginWork

saberias me dizer do que se trata?

uso o turbo delphi


GOSTEI 0
Mahdak

Mahdak

12/10/2006

só pra galera saber.. formatei o pc e instalei indy 9 pq nao dei volta no problema e nem no indy 10...

agora tudo certo, enviando o email atraves do TIdAttachment.Create

abraços a todos!


GOSTEI 0
POSTAR