Koble sig til URL med brugernavn og kodeord

Jeg har prøvet at lave et program, som skal gå ind på et bestemt web-site og hente filer ned.  Hvis jeg gør det på et åbent web-site, så kører programmet glimrende.  Men hvis jeg gør det på et beskyttet web-site, får jeg en fejl.  Spørgsmålet er: Hvordan får jeg overført brugernavn og kodeord?

De vigtigste detaljer fra programmet:
uses URLMon;

function DownloadFile(SourceFile,Destfile:string):boolean;
var retcode: integer;
begin
  try
    retcode:=UrlDownloadToFile(nil,PChar(SourceFile),
                              PChar(DestFile),0,nil);
    Result:=(retcode=0);
  except
    Result:=False
  end;
end;

Når det går galt, har retcode værdien -2147024891, og når det går godt er værdien 0.