OnGetStream

TAttachment THTMLContent

property OnGetStream: TGetStreamEvent

Description

L'événement OnGetStream est invoqué lors de la génération du mail pour obtenir le flux associé à une pièce jointe ou un élément intégré. Si l'évènement n'est pas défini, la propriété Stream est utilisée.

Exemple

procedure TForm1.OnGetStream(Sender: TObject; var Stream: TStream; var AutoFree: Boolean);
begin
  Stream := TFileStream.Create('image1.png', fmOpenRead or fmShareDenyNone);
  AutoFree := True;
end;