FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#21
|
|||
|
|||
TIdAttachment.Create(Mensaje.MessageParts,adjunto);
estoy intentando enviar un mail con archivos adjuntos utilizando DELPHI XE, y el compilador me dice que la linea anterior, tiene parametros demas... segun deberia ser.. TIdAttachment.Create(Mensaje.MessageParts); la preguntas es.. entonces como asigno el/los archivo(s) adjunto(s)??? he utilizado de cuanto he visto en internet y nada.. lo ulitimo fue esto.. for i := 0 to lFicherosAdjuntos.Count-1 do if FileExists(lFicherosAdjuntos.items[i]) then with TIdAttachment.Create(idmessage.MessageParts) do begin idmessage.ContentType := 'text/pdf'; idmessage.ContentTransferEncoding:='base64'; idmessage.extraheaders.Add('Content-ID: <somelogo>'); end; en el create.. no se me acepta colocar. TIdAttachment.Create(idmessage.MessageParts,lFicherosAdjuntos.items[i]) por que me da el error de extra parametro, y si continuo la aplicacion asi como esta, me envia un error: |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|