2
0
Unknown 7 жил өмнө
parent
commit
96636fdc8e
1 өөрчлөгдсөн 22 нэмэгдсэн , 1 устгасан
  1. 22 1
      README.md

+ 22 - 1
README.md

@@ -168,4 +168,25 @@ Small delphi library containing interesting and quick to implement functions, cr
 	MyString := MyObject.ToJson;
 	
 	//You can clone simple objects with clone function
-	MyObject1.Clone(MyObject2);
+	MyObject1.Clone(MyObject2);
+	
+	
+**Quick.SMTP:** Send email with two code lines.
+
+	//Send email
+	SMTP := TSMTP.Create('mail.domain.com',25,False);
+	SMTP.SendMail('[email protected]','[email protected]','Email subject','My message body');
+	
+	//You can define more advanced options
+	SMTP.SenderName := 'John';
+	SMTP.From := '[email protected]';
+	SMTP.Recipient := '[email protected],[email protected]';
+	SMTP.Subject := 'Email subject';
+	SMTP.AddBodyFromFile := '.\body.html';
+	SMTP.CC := '[email protected]';
+	SMTP.BCC := '[email protected]';
+	SMTP.Attachments.Add('.\notes.txt');
+	SMTP.SendMail;
+	
+	
+