TIdAttachment

Question

Bonjour je développe une gestion commerciale perso sur Delphi 9
Pour joindre une pièce jointe à un mail j'utilise la cde TiAttachment, qui est bloque la compil, j'ai pourtant indy10 dans mon Package.
je suis bien embêté depuis plusieurs jours....
voici les lignes de code
si l'un d'entre vous a une solution
Merci d'avance
Eupani33 
idmessage.Body.Assign(memo.Lines);
  if not (Piecejointe.Text='')    then TIdAttachment.Create(IdMessage1.MessageParts,piecejointe.Text);

f0xi · Answer

uses IdAttachment;

var IdA : IdAttachment.TIdAttachment;

procedure ....
begin
  IdA := IdAttachment.TIdAttachment.Create(IdMessage1.MessageParts);

  // ou 

  IdA := TIdAttachment(IdMessage1.MessageParts.Add);
end;

eupani33 · Answer

Merci,
c'est très sympa
Eupani33

TIdAttachment

2 réponses

Votre réponse

Discussions similaires