Smtp mail gönderme (Hotmail_hatası)

[fatsali_85]

Smtp ile mail gönderirken gmail ile sorun yaşamıyorken, Hotmail ile gönderirken 'Invalid Arguments' hatası geliyor.
SMTP ye bağlanmada sorun olmuyor.
SMTP.Send(mesaj); kısmında geliyor bu hata. Fikri olanlar, yardımcı olabilirseniz sevinirim.

Kod: Tümünü seç

mesaj: TIdMessage;
SMTP: TIdSMTP;

procedure Tfrmmailmain.testmail;
begin
SMTP.Host:= 'smtp.live.com';
SMTP.Username:='........' ;//hotmail adresim
smtp.Password:= '.......' ;//hotmail şifrem
SMTP.Port :=587;

mesaj.Body.Assign(bodymemo.Lines);
mesaj.Subject:='Sınama Maili';
mesaj.From.Text:=frmayarlar.mailedit.Text;
mesaj.Recipients.EMailAddresses:=frmayarlar.mailedit.Text;


          SMTP.IOHandler := SSLHandler;
          SSLHandler.SSLOptions.Method := sslvSSLv3;
          SSLHandler.SSLOptions.Mode:=sslmClient;
          SMTP.UseTLS := utUseExplicitTLS;
   try
      SMTP.Connect;
      if SMTP.Connected then
          begin
               try
              mesaj.CharSet:='iso-8859-9';
              SMTP.Send(mesaj);
              except
              on e: Exception do ShowMessage(e.message);
              end;
          end;
   finally
    if SMTP.Connected then SMTP.Disconnect();
    mesaj.MessageParts.Clear;
   end;
end;