IdSMTP做发邮件程序时，为什么163的发不了？（在线等~分不够可以加！）

IdSMTP1.Host := '163.com';
    IdSMTP1.Port := 25;
    IdSMTP1.AuthenticationType := atLogin;
    IdSMTP1.Username := '*****'; //邮箱账号
    IdSMTP1.Password := '*****'; //邮箱密码    with IdMessage1 do
    begin
   //Body.Assign('Memo1.Lines');
        Body.Text := ('姓名：'+suiEdit4.Text+ #13 +'联糸方法：'+ suiEdit3.Text+ #13 + suiMemo1.Lines.Text); //邮件正文
        From.Text := '[email protected]'; //发件人地址
        Recipients.EMailAddresses := '[email protected]'; //收件人地址        Subject := '客户反映（号码查询软件）'+DateTimeToStr(now()); //邮件主题
    end;    try
        if not IdSMTP1.Connected then
            IdSMTP1.Connect;
        try
            IdSMTP1.Send(IdMessage1);
            MessageBox(0, '发送成功', '提示', MB_OK + MB_ICONINFORMATION);        finally
            if IdSMTP1.Connected then
                IdSMTP1.Disconnect;
        end;
    except
        application.MessageBox('邮件地址不正确，或代理设置出错，或登陆名称与口令不正确。', '错误', MB_OK + MB_ICONERROR);
    //continue;
    end;
以上代码，我用公司的服务又得！实在不解~~~