[Indy] Acess Violation

type TLib = class(TObject)
    ID_HTTP : TIdHTTP;
    ID_COOKIE_MANAGER: TIdCookieManager;
  private
    strUser_Name, strUser_Password, strUser_Server, strUser_Agent: string;
    boolConnected : boolean;
    procedure DISCONNECT();
  public
    constructor Create();
    procedure CONNECT();
    procedure SET_CONFIG();
  end;

constructor TLib.Create();
begin
  ID_HTTP := TIdHTTP.Create(nil);
  ID_COOKIE_MANAGER := TIdCookieManager.Create(nil);
  with ID_HTTP do
  begin
    with Request do
      begin
        UserAgent := strUser_Agent;
        Accept:= CstrAccept;
        AcceptLanguage := CstrAccept_Language;
        AcceptEncoding := CStrAccept_Encoding;
        Connection := CstrConnection;
        CacheControl := CstrCache_Control;
        ContentType := CstrContent_Type;
      end;
      AllowCookies := true;
      CookieManager := ID_COOKIE_MANAGER;
  end;
end;

  ID_HTTP := TIdHTTP.Create(nil);