Помогите исправить ошибку (delphi)

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by LOger, 23 Jan 2013.

  1. LOger

    LOger New Member

    Joined:
    11 Nov 2012
    Messages:
    23
    Likes Received:
    0
    Reputations:
    -11
    Пишу программу с отправкой кода на почту и тут вот на многих компьютерах такая проблема
    syntactically invalid ehlo argument(s)
    Посмотрел, и увидел что там что то связано с именем компьютера....Как эту проблему можно исправить? Эта программа должна работать на других компьютерах и не изменять же всем имя? :confused:

    idsmtp1.Host:='smtp.mail.ru' ;// oino
    idsmtp1.MailAgent:='Mozilla';// eiy aaaioa
    idsmtp1.Port:=25 ;// ii?o
    idsmtp1.Username:='xakep_alex' ;// eiaei ii?ou
    idsmtp1.Password:='****' ;// ia?ieu ii?ou
    idmessage1.CharSet:='windows-1251';// eiae?iaea (?onneea neiaieu)
    idmessage1.ContentType:='text/plain'; // oei ienuia
    idmessage1.Body.Text:='fffff: ' + code ;// oaeno ienuia
    idmessage1.Subject:=AnsiString('Key');// oaia ienuia
    idmessage1.From.text:= '[email protected]';// io eiai
    idmessage1.Recipients.EMailAddresses:= login.Text;// eiio
    idmessage1.IsEncoded:=true;

    try
    try
    idsmtp1.connect();
    if idSmtp1.Cоnnected=true then
    begin
    idsmtp1.Send(idmessage1)
    end;
    except on E:Exception do
    begin

    ShowMessage('Erorr');
    end;
    end;
    finally
    if idsmtp1.Cоnnected
    then idsmtp1.Disconnect();
    end;


    Прошу прощения за не читаемые комментарии
     
  2. dos999

    dos999 Elder - Старейшина

    Joined:
    15 Feb 2008
    Messages:
    137
    Likes Received:
    24
    Reputations:
    0
    чтобы коменты сохранились переключай раскладку при копировании из Delphi

    idmessage1.IsEncoded не знаю что за свойство, у меня почему то всегда false стоит, и судя по твоей ошибке "syntactically invalid ehlo argument(s) " это может быть как то связано.

    возможно это ещё один глюк инди. какая кстати версия инди используется?