Скачать: CL | DM;

IdHTTP : OnAuthorization   Найти похожие ветки 

← →
Сатир   (2002-05-29 14:11) [0]

Народ! Помогите, плиз! Уже какой день страдаю:-(

Короче, беда такая. Если устанавливать свойства для пароля и юзернейма через инспектор, то канает и получает сайт без вопросов. А если делаю эту авторизацию через диалог, то никакого эффекта.:-((( Может нужно метод ещё како-нить вызвать...
В хелпе прочитал, что пароль и логин объединяются с помощью ":" в одну строку и кодируются по base 64. Для этого вызывается метод
Authentication.Authentication, который возвращает эту строку, но куда её потом передать, я без руля. Подскажите, кто знает


procedure TForm1.HTTPAuthorization(Sender: TObject;
Authentication: TIdAuthentication; var Handled: Boolean);

begin
with WWWPasswordDlg do begin
showmodal;
with Authentication do
begin
Params.Values["Username"] := UsrName.text;
Params.Values["Password"] := Passwd.text;
end;
end;
end;


---

← →
Сатир   (2002-05-30 13:33) [1]

народ, поскажите хоть что-нибуть!

---

← →
Lefan ©   (2002-05-31 13:00) [2]

Приветствую!!!Вроде решил проблему со сменой проксей... :)

HTTP.Request.Username := edUsername.Text;
HTTP.Request.Password := edPassword.Text;
HTTP.Request.ProxyUsername := edUsername.Text;
HTTP.Request.ProxyPassword := edPassword.Text;
HTTP.Request.ProxyServer := edProxyServer.Text;
HTTP.Request.ProxyPort := StrToIntDef(edProxyPort.Text, 80);

По отдельности не работала, имею ввиду когда задовал (...Username; ...Password или ...ProxyUsername; ...ProxyPassword), а если всем присвоить значения, то вроде канает :)

Желаю удачи!!!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c