TIDSMTP發送郵件時的奇怪提示!

TIDSMTP發送郵件時的奇怪提示! Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiNetwork/html/delphi_20061214202002126.html
我用Indy的TIDSMTP和TIDMessage寄送電子郵件,但是出現了bad   secquence   of   command錯誤!My Code是這樣的:  
  procedure   TfrmEmail.SpeedButton7Click(Sender:   TObject);  
  var   Msg:   TIDMessage;  
  begin  
          Msg:=TIDMessage.Create(SMTP);  
          Msg.Clear;  
          Msg.Subject:=edtSubject.Text;     //subject   主題  
          Msg.Body.Assign(memoBody.Lines);   //body   內容  
          Msg.From.Text:=Trim(edtFrom.Text);     //寄件人  
          Msg.Recipients.EMailAddresses:=Trim(edtMailto.Text);   //收信人  
          SMTP.Host:='smtp.163.com';  
          SMTP.AuthenticationType:=atLogin;  
          SMTP.Username:='xaguobo';  
          SMTP.Password:='*******'     ;//這裡我輸入的是我的163郵箱的登陸密碼  
          SMTP.Port:=25;  
          try  
              SMTP.Connect(-1);   //   我跟蹤串連伺服器成功  
              try  
                  SMTP.Send(Msg);  
                  ShowMessage('郵件已發送');  
              finally  
                  SMTP.Disconnect;  
              end;  
      except  
          on   e:   exception   do  
              ShowMessage('Mail   寄送失敗:'   +   e.Message);  
   
      end;  
   
  end;  
   
  請個位大蝦指教!