[Bug 27864] New: Implement winhttp SetCredentials

http://bugs.winehq.org/show_bug.cgi?id=27864

Summary: Implement winhttp SetCredentials
           Product: Wine
           Version: 1.3.24
          Platform: x86
        OS/Version: Linux
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: winhttp
        AssignedTo: [e-mail]
        ReportedBy: [e-mail]

Personal app currently hits bug 26586 I can change it to use use winhttp, but
face same thing here.

Sample: http://netikka.net/dev/winhttp5.exe

Click "download" -> message "success" if worked.

procedure TForm1.Button1Click(Sender: TObject);
var fhttp: variant;
begin
 fhttp:=createoleobject('WinHttp.WinHttpRequest.5.1');
 fhttp.open('GET', edit1.text, true);
 fhttp.SetCredentials(edit2.text, edit3.text, 0);
 fhttp.send();
 if Not FHttp.WaitForResponse(60) then
  begin
   FHttp.Abort;
   exit;
 end;
 memo1.text:=fhttp.responsetext;
 if ansipos('congratulation!', ansilowercase(memo1.text))>0 then
showmessage('SUCCESS!') else showmessage('FAILED!');
 fhttp:=unassigned;
end;