TSMTPProtocol.CreateNewSpoolerMail
| TSMTPProtocol = class (TObject) | Interface de TSMTPProtocol | Exemples de TSMTPProtocol |
Qubes 10.0 Description de CreateNewSpoolerMail
Syntaxe
class function CreateNewSpoolerMail(routeID: Integer; mailData: TSMTPMailData; summary: String = ''): TSpoolerMessage
routeID: ID de la route à associer au message. Le protocole de la route associée doit être SMTP.
mailData: Objet contenant les données du mail à envoyer
summary: (Optionnel) Résumé du message
Remarques
Exemples
// Création d'un message SMTP
var recipients : Array of String;
var headers : Array [String] of String;
// Ajout des destinataires
recipients.Add("test.mail@creative-it.net");
// Création de l'objet contenant les informations du mail
var mailData := new TSMTPMailData;
// Initialisation des données avec celles passées en paramètre
mailData.Sender := "smtptest@creative-it.net";
mailData.SenderName := "SMTP Test";
mailData.SendTo := recipients;
mailData.Subject := "Test of mail sent through SMTP protocol";
mailData.Body := "Test of sending SMTP mail as an example";
mailData.headers := headers;
// Création du message
var newMessage := TSMTPProtocol.CreateNewSpoolerMail(1, mailData);
var recipients : Array of String;
var headers : Array [String] of String;
// Ajout des destinataires
recipients.Add("test.mail@creative-it.net");
// Création de l'objet contenant les informations du mail
var mailData := new TSMTPMailData;
// Initialisation des données avec celles passées en paramètre
mailData.Sender := "smtptest@creative-it.net";
mailData.SenderName := "SMTP Test";
mailData.SendTo := recipients;
mailData.Subject := "Test of mail sent through SMTP protocol";
mailData.Body := "Test of sending SMTP mail as an example";
mailData.headers := headers;
// Création du message
var newMessage := TSMTPProtocol.CreateNewSpoolerMail(1, mailData);