[Zo_Omer]

Решено! Товарищи, сделал своими силами (да прибудет с нами гугл)

Код:

procedure TForm1.Button1Click(Sender: TObject);
var HTTP: THTTPSend;
  Res : boolean;
  d,f: TStringStream;
     s:string;
begin
HTTP := THTTPSend.Create;
   HTTP.MimeType:='application/x-www-form-urlencoded';
    d:=TStringStream.Create('Domain=mail.ru&Login=[логин]&Password=[пароль]&level=0');
    f:= TStringStream.Create('');
    HTTP.Document.LoadFromStream(d);
     try
    Res := HTTP.HTTPMethod('POST', 'https://auth.mail.ru/cgi-bin/auth');
    http.Clear;
    http.HTTPMethod('get','https://e.mail.ru/cgi-bin/editpass');
    HTTP.Document.SaveToStream(f);
              memo1.Text:=f.DataString;
              Memo1.Text:=Utf8ToAnsi(Memo1.Text);
              Memo1.Text:=trim(Memo1.Text);

    
  finally
    HTTP.Free;
  end;
  if pos('[майл]',f.DataString)>0 then
  ShowMessage('Авторизовались')
else
  ShowMessage('Не удалось');
end;