with GNATCOM.Dispinterface;

package SHDocVw.IShellUIHelper8_Object is

   type IShellUIHelper8_Type is
     new GNATCOM.Dispinterface.Dispinterface_Type with null record;

   procedure ResetFirstBootMode
     (This : IShellUIHelper8_Type);

   procedure ResetSafeMode
     (This : IShellUIHelper8_Type);

   procedure RefreshOfflineDesktop
     (This : IShellUIHelper8_Type);

   procedure AddFavorite
     (This  : IShellUIHelper8_Type;
      URL   : GNATCOM.Types.VARIANT;
      Title : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free  : Boolean := True);

   procedure AddChannel
     (This : IShellUIHelper8_Type;
      URL  : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   procedure AddDesktopComponent
     (This   : IShellUIHelper8_Type;
      URL    : GNATCOM.Types.VARIANT;
      uType  : GNATCOM.Types.VARIANT;
      Left   : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Top    : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Width  : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Height : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free   : Boolean := True);

   function IsSubscribed
     (This : IShellUIHelper8_Type;
      URL  : GNATCOM.Types.VARIANT;
      Free : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure NavigateAndFind
     (This           : IShellUIHelper8_Type;
      URL            : GNATCOM.Types.VARIANT;
      strQuery       : GNATCOM.Types.VARIANT;
      varTargetFrame : GNATCOM.Types.VARIANT;
      Free           : Boolean := True);

   procedure ImportExportFavorites
     (This          : IShellUIHelper8_Type;
      fImport       : GNATCOM.Types.VARIANT;
      strImpExpPath : GNATCOM.Types.VARIANT;
      Free          : Boolean := True);

   procedure AutoCompleteSaveForm
     (This : IShellUIHelper8_Type;
      Form : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free : Boolean := True);

   procedure AutoScan
     (This            : IShellUIHelper8_Type;
      strSearch       : GNATCOM.Types.VARIANT;
      strFailureUrl   : GNATCOM.Types.VARIANT;
      pvarTargetFrame : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free            : Boolean := True);

   procedure AutoCompleteAttach
     (This     : IShellUIHelper8_Type;
      Reserved : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free     : Boolean := True);

   function ShowBrowserUI
     (This     : IShellUIHelper8_Type;
      bstrName : GNATCOM.Types.VARIANT;
      pvarIn   : GNATCOM.Types.VARIANT;
      Free     : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure AddSearchProvider
     (This : IShellUIHelper8_Type;
      URL  : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   procedure RunOnceShown
     (This : IShellUIHelper8_Type);

   procedure SkipRunOnce
     (This : IShellUIHelper8_Type);

   procedure CustomizeSettings
     (This       : IShellUIHelper8_Type;
      fSQM       : GNATCOM.Types.VARIANT;
      fPhishing  : GNATCOM.Types.VARIANT;
      bstrLocale : GNATCOM.Types.VARIANT;
      Free       : Boolean := True);

   function SqmEnabled
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function PhishingEnabled
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function BrandImageUri
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   procedure SkipTabsWelcome
     (This : IShellUIHelper8_Type);

   procedure DiagnoseConnection
     (This : IShellUIHelper8_Type);

   procedure CustomizeClearType
     (This : IShellUIHelper8_Type;
      fSet : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function IsSearchProviderInstalled
     (This : IShellUIHelper8_Type;
      URL  : GNATCOM.Types.VARIANT;
      Free : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function IsSearchMigrated
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function DefaultSearchProvider
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   procedure RunOnceRequiredSettingsComplete
     (This      : IShellUIHelper8_Type;
      fComplete : GNATCOM.Types.VARIANT;
      Free      : Boolean := True);

   function RunOnceHasShown
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function SearchGuideUrl
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   procedure AddService
     (This : IShellUIHelper8_Type;
      URL  : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function IsServiceInstalled
     (This : IShellUIHelper8_Type;
      URL  : GNATCOM.Types.VARIANT;
      Verb : GNATCOM.Types.VARIANT;
      Free : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function InPrivateFilteringEnabled
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   procedure AddToFavoritesBar
     (This  : IShellUIHelper8_Type;
      URL   : GNATCOM.Types.VARIANT;
      Title : GNATCOM.Types.VARIANT;
      uType : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free  : Boolean := True);

   procedure BuildNewTabPage
     (This : IShellUIHelper8_Type);

   procedure SetRecentlyClosedVisible
     (This     : IShellUIHelper8_Type;
      fVisible : GNATCOM.Types.VARIANT;
      Free     : Boolean := True);

   procedure SetActivitiesVisible
     (This     : IShellUIHelper8_Type;
      fVisible : GNATCOM.Types.VARIANT;
      Free     : Boolean := True);

   procedure ContentDiscoveryReset
     (This : IShellUIHelper8_Type);

   function IsSuggestedSitesEnabled
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   procedure EnableSuggestedSites
     (This    : IShellUIHelper8_Type;
      fEnable : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   procedure NavigateToSuggestedSites
     (This            : IShellUIHelper8_Type;
      bstrRelativeUrl : GNATCOM.Types.VARIANT;
      Free            : Boolean := True);

   procedure ShowTabsHelp
     (This : IShellUIHelper8_Type);

   procedure ShowInPrivateHelp
     (This : IShellUIHelper8_Type);

   function msIsSiteMode
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   procedure msSiteModeShowThumbBar
     (This : IShellUIHelper8_Type);

   function msSiteModeAddThumbBarButton
     (This        : IShellUIHelper8_Type;
      bstrIconURL : GNATCOM.Types.VARIANT;
      bstrTooltip : GNATCOM.Types.VARIANT;
      Free        : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure msSiteModeUpdateThumbBarButton
     (This     : IShellUIHelper8_Type;
      ButtonID : GNATCOM.Types.VARIANT;
      fEnabled : GNATCOM.Types.VARIANT;
      fVisible : GNATCOM.Types.VARIANT;
      Free     : Boolean := True);

   procedure msSiteModeSetIconOverlay
     (This            : IShellUIHelper8_Type;
      IconUrl         : GNATCOM.Types.VARIANT;
      pvarDescription : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free            : Boolean := True);

   procedure msSiteModeClearIconOverlay
     (This : IShellUIHelper8_Type);

   procedure msAddSiteMode
     (This : IShellUIHelper8_Type);

   procedure msSiteModeCreateJumpList
     (This       : IShellUIHelper8_Type;
      bstrHeader : GNATCOM.Types.VARIANT;
      Free       : Boolean := True);

   procedure msSiteModeAddJumpListItem
     (This           : IShellUIHelper8_Type;
      bstrName       : GNATCOM.Types.VARIANT;
      bstrActionUri  : GNATCOM.Types.VARIANT;
      bstrIconUri    : GNATCOM.Types.VARIANT;
      pvarWindowType : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free           : Boolean := True);

   procedure msSiteModeClearJumpList
     (This : IShellUIHelper8_Type);

   procedure msSiteModeShowJumpList
     (This : IShellUIHelper8_Type);

   function msSiteModeAddButtonStyle
     (This        : IShellUIHelper8_Type;
      uiButtonID  : GNATCOM.Types.VARIANT;
      bstrIconURL : GNATCOM.Types.VARIANT;
      bstrTooltip : GNATCOM.Types.VARIANT;
      Free        : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure msSiteModeShowButtonStyle
     (This       : IShellUIHelper8_Type;
      uiButtonID : GNATCOM.Types.VARIANT;
      uiStyleID  : GNATCOM.Types.VARIANT;
      Free       : Boolean := True);

   procedure msSiteModeActivate
     (This : IShellUIHelper8_Type);

   function msIsSiteModeFirstRun
     (This           : IShellUIHelper8_Type;
      fPreserveState : GNATCOM.Types.VARIANT;
      Free           : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure msAddTrackingProtectionList
     (This           : IShellUIHelper8_Type;
      URL            : GNATCOM.Types.VARIANT;
      bstrFilterName : GNATCOM.Types.VARIANT;
      Free           : Boolean := True);

   function msTrackingProtectionEnabled
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function msActiveXFilteringEnabled
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function msProvisionNetworks
     (This                : IShellUIHelper8_Type;
      bstrProvisioningXml : GNATCOM.Types.VARIANT;
      Free                : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure msReportSafeUrl
     (This : IShellUIHelper8_Type);

   procedure msSiteModeRefreshBadge
     (This : IShellUIHelper8_Type);

   procedure msSiteModeClearBadge
     (This : IShellUIHelper8_Type);

   procedure msDiagnoseConnectionUILess
     (This : IShellUIHelper8_Type);

   procedure msLaunchNetworkClientHelp
     (This : IShellUIHelper8_Type);

   procedure msChangeDefaultBrowser
     (This    : IShellUIHelper8_Type;
      fChange : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   procedure msStopPeriodicTileUpdate
     (This : IShellUIHelper8_Type);

   procedure msStartPeriodicTileUpdate
     (This               : IShellUIHelper8_Type;
      pollingUris        : GNATCOM.Types.VARIANT;
      startTime          : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      uiUpdateRecurrence : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free               : Boolean := True);

   procedure msStartPeriodicTileUpdateBatch
     (This               : IShellUIHelper8_Type;
      pollingUris        : GNATCOM.Types.VARIANT;
      startTime          : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      uiUpdateRecurrence : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free               : Boolean := True);

   procedure msClearTile
     (This : IShellUIHelper8_Type);

   procedure msEnableTileNotificationQueue
     (This    : IShellUIHelper8_Type;
      fChange : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   function msPinnedSiteState
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   procedure msEnableTileNotificationQueueForSquare150x150
     (This    : IShellUIHelper8_Type;
      fChange : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   procedure msEnableTileNotificationQueueForWide310x150
     (This    : IShellUIHelper8_Type;
      fChange : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   procedure msEnableTileNotificationQueueForSquare310x310
     (This    : IShellUIHelper8_Type;
      fChange : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   procedure msScheduledTileNotification
     (This                : IShellUIHelper8_Type;
      bstrNotificationXml : GNATCOM.Types.VARIANT;
      bstrNotificationId  : GNATCOM.Types.VARIANT;
      bstrNotificationTag : GNATCOM.Types.VARIANT;
      startTime           : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      expirationTime      : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free                : Boolean := True);

   procedure msRemoveScheduledTileNotification
     (This               : IShellUIHelper8_Type;
      bstrNotificationId : GNATCOM.Types.VARIANT;
      Free               : Boolean := True);

   procedure msStartPeriodicBadgeUpdate
     (This               : IShellUIHelper8_Type;
      pollingUri         : GNATCOM.Types.VARIANT;
      startTime          : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      uiUpdateRecurrence : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free               : Boolean := True);

   procedure msStopPeriodicBadgeUpdate
     (This : IShellUIHelper8_Type);

   procedure msLaunchInternetOptions
     (This : IShellUIHelper8_Type);

   procedure SetExperimentalFlag
     (This           : IShellUIHelper8_Type;
      bstrFlagString : GNATCOM.Types.VARIANT;
      vfFlag         : GNATCOM.Types.VARIANT;
      Free           : Boolean := True);

   function GetExperimentalFlag
     (This           : IShellUIHelper8_Type;
      bstrFlagString : GNATCOM.Types.VARIANT;
      Free           : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure SetExperimentalValue
     (This            : IShellUIHelper8_Type;
      bstrValueString : GNATCOM.Types.VARIANT;
      dwValue         : GNATCOM.Types.VARIANT;
      Free            : Boolean := True);

   function GetExperimentalValue
     (This            : IShellUIHelper8_Type;
      bstrValueString : GNATCOM.Types.VARIANT;
      Free            : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure ResetAllExperimentalFlagsAndValues
     (This : IShellUIHelper8_Type);

   function GetNeedIEAutoLaunchFlag
     (This    : IShellUIHelper8_Type;
      bstrUrl : GNATCOM.Types.VARIANT;
      Free    : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure SetNeedIEAutoLaunchFlag
     (This    : IShellUIHelper8_Type;
      bstrUrl : GNATCOM.Types.VARIANT;
      flag    : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   function HasNeedIEAutoLaunchFlag
     (This    : IShellUIHelper8_Type;
      bstrUrl : GNATCOM.Types.VARIANT;
      Free    : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure LaunchIE
     (This      : IShellUIHelper8_Type;
      bstrUrl   : GNATCOM.Types.VARIANT;
      automated : GNATCOM.Types.VARIANT;
      Free      : Boolean := True);

   function GetCVListData
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function GetCVListLocalData
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function GetEMIEListData
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   function GetEMIEListLocalData
     (This : IShellUIHelper8_Type)
     return GNATCOM.Types.VARIANT;

   procedure OpenFavoritesPane
     (This : IShellUIHelper8_Type);

   procedure OpenFavoritesSettings
     (This : IShellUIHelper8_Type);

   procedure LaunchInHVSI
     (This    : IShellUIHelper8_Type;
      bstrUrl : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

end SHDocVw.IShellUIHelper8_Object;

