OnHeader

TMailer

property OnHeader: TMailHeaderEvent

Description

L'événement OnHeader se produit juste après la génération de l'entête du mail.

Exemple

procedure TForm1.Mailer1Header(Sender: TMailer; var Header: string);
begin
  StatusBar1.SimpleText := Format('Sending header (%d bytes)', [Length(Header)]);
end;