아래와 같은 방식으로 통과.
다른 값을 넘겨야 한다면 POST 로 호출해도 좋음.


procedure TForm1.Button1Click(Sender: TObject);
var
  IdHTTP1: TIdHTTP;
  Host: String;

begin
  IdHTTP1:=TIdHTTP.Create(Self);
  try
    IdHTTP1.Request.Username := '인증ID';
    IdHTTP1.Request.Password := '인증비밀번호';
    idHTTP1.Request.BasicAuthentication := true;
    Memo1.Text:=IdHTTP1.Get('http://인증URL');
  finally
    FreeAndNil(IdHTTP1);
  end;
end;




Posted by bloodguy
,