![]() |
|
اين اجد مكون tnmsmtp المستخدم في دلفي - نسخة قابلة للطباعة +- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum) +-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3) +--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15) +--- الموضوع : اين اجد مكون tnmsmtp المستخدم في دلفي (/showthread.php?tid=6187) |
اين اجد مكون tnmsmtp المستخدم في دلفي - noor.aldeen.sha - 15-05-2014 السلام عليكم اين اجد مكون TNMSMTP المستخدم في هذا الكود عما ان هذا الكود لأرسال ايميل سأقوم بأضافته لتعم الفائدة الجميع كود : // You must use the component TNMSMTP from FastNet tools.
procedure TForm1.Button1Click(Sender: TObject);
begin
NMSMTP1.Host := 'mail.host.com';
NMSMTP1.UserID := 'Username';
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := 'admin@delphitricks.com';
NMSMTP1.PostMessage.ToAddress.Text := 'user@host.com';
NMSMTP1.PostMessage.ToCarbonCopy.Text := 'AnotherUser@host.com';
NMSMTP1.PostMessage.ToBlindCarbonCopy.Text := 'AnotherUser@host.com';
NMSMTP1.PostMessage.Body.Text := 'This is the message';
NMSMTP1.PostMessage.Attachments.Text := 'c:\File.txt';
NMSMTP1.PostMessage.Subject := 'Mail subject';
NMSMTP1.SendMail;
ShowMessage('Mail sent !');
NMSMTP1.Disconnect;
end; |