UP

解决方案 »

  1.   

    邮件创建后,指定 Host,Port 链接到服务器try 
      IdSmtp1.Send(TheMail) ;
    Except 
      ShowMessage('Fail') ;
    End;
      

  2.   

    with ldsmtp do 
      begin
        if send  then
           showmessage('success')
        else 
           showmessage('unsucess')
      end;
      

  3.   

    楼上你好 :TIdSMTP.Send 是个过程吧
    ---------------------------------------------
    From Help :
    ---------------------------------------------
    Sends an Indy message instance to the SMTP server.procedure Send(AMsg: TIdMessage); virtual;
    Parameters
    AMsg: TIdMessage