{$mode objfpc} {$h+} { urlmon.h translation. Original urlmon.h copyright: Microsoft Windows Copyright (c) Microsoft Corporation. All rights reserved. } Unit urlmon; Interface Uses windows, activex; Const liburlmon = 'urlmon.dll'; SZ_URLCONTEXT: POLEStr = 'URL Context'; SZ_ASYNC_CALLEE: POLEStr = 'AsyncCallee'; MKSYS_URLMONIKER = 6; IID_IAuthenticate : TGUID = '{79eac9d0-baf9-11ce-8c82-00aa004ba90b}'; IID_IBindHost : TGUID = '{fc4801a1-2ba9-11cf-a229-00aa003d7352}'; IID_IBinding : TGUID = '{79eac9c0-baf9-11ce-8c82-00aa004ba90b}'; IID_IBindStatusCallback : TGUID = '{79eac9c1-baf9-11ce-8c82-00aa004ba90b}'; IID_ICodeInstall : TGUID = '{79eac9d1-baf9-11ce-8c82-00aa004ba90b}'; IID_IDataFilter : TGUID = '{69d14c80-c18e-11d0-a9ce-006097942311}'; IID_IEncodingFilterFactory : TGUID = '{70bdde00-c18e-11d0-a9ce-006097942311}'; IID_IHttpNegotiate : TGUID = '{79eac9d2-baf9-11ce-8c82-00aa004ba90b}'; IID_IHttpSecurity : TGUID = '{79eac9d7-bafa-11ce-8c82-00aa004ba90b}'; IID_IInternet : TGUID = '{79eac9e0-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetBindInfo : TGUID = '{79eac9e1-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetHostSecurityManager : TGUID = '{3af280b6-cb3f-11d0-891e-00c04fb6bfc4}'; IID_IInternetPriority : TGUID = '{79eac9eb-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetProtocol : TGUID = '{79eac9e4-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetProtocolInfo : TGUID = '{79eac9ec-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetProtocolRoot : TGUID = '{79eac9e3-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetProtocolSink : TGUID = '{79eac9e5-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetSecurityManager : TGUID = '{79eac9ee-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetSecurityMgrSite : TGUID = '{79eac9ed-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetSession : TGUID = '{79eac9e7-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetThreadSwitch : TGUID = '{79eac9e8-baf9-11ce-8c82-00aa004ba90b}'; IID_IInternetZoneManager : TGUID = '{79eac9ef-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInet : TGUID = '{79eac9e0-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInetBindInfo : TGUID = '{79eac9e1-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInetPriority : TGUID = '{79eac9eb-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInetProtocol : TGUID = '{79eac9e4-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInetProtocolInfo : TGUID = '{79eac9ec-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInetProtocolRoot : TGUID = '{79eac9e3-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInetProtocolSink : TGUID = '{79eac9e5-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInetSession : TGUID = '{79eac9e7-baf9-11ce-8c82-00aa004ba90b}'; IID_IOInetThreadSwitch : TGUID = '{79eac9e8-baf9-11ce-8c82-00aa004ba90b}'; IID_IPersistMoniker : TGUID = '{79eac9c9-baf9-11ce-8c82-00aa004ba90b}'; IID_ISoftDistExt : TGUID = '{B15B8DC1-C7E1-11d0-8680-00AA00BDCB71}'; IID_IWindowForBindingUI : TGUID = '{79eac9d5-bafa-11ce-8c82-00aa004ba90b}'; IID_IWinInetHttpInfo : TGUID = '{79eac9d8-bafa-11ce-8c82-00aa004ba90b}'; IID_IWinInetInfo : TGUID = '{79eac9d6-bafa-11ce-8c82-00aa004ba90b}'; SID_IBindHost : TGUID = '{fc4801a1-2ba9-11cf-a229-00aa003d7352}'; SID_IInternetHostSecurityManager : TGUID = '{3af280b6-cb3f-11d0-891e-00c04fb6bfc4}'; SID_IInternetSecurityManager : TGUID = '{79eac9ee-baf9-11ce-8c82-00aa004ba90b}'; SID_SBindHost : TGUID = '{fc4801a1-2ba9-11cf-a229-00aa003d7352}'; URLMON_OPTION_USERAGENT = $10000001; URLMON_OPTION_USERAGENT_REFRESH = $10000002; CF_NULL = 0; CFSTR_MIME_NULL = 0; CFSTR_MIME_TEXT = 'text/plain'; CFSTR_MIME_RICHTEXT = 'text/richtext'; CFSTR_MIME_X_BITMAP = 'image/x-xbitmap'; CFSTR_MIME_POSTSCRIPT = 'application/postscript'; CFSTR_MIME_AIFF = 'audio/aiff'; CFSTR_MIME_BASICAUDIO = 'audio/basic'; CFSTR_MIME_WAV = 'audio/wav'; CFSTR_MIME_X_WAV = 'audio/x-wav'; CFSTR_MIME_GIF = 'image/gif'; CFSTR_MIME_PJPEG = 'image/pjpeg'; CFSTR_MIME_JPEG = 'image/jpeg'; CFSTR_MIME_TIFF = 'image/tiff'; CFSTR_MIME_X_PNG = 'image/x-png'; CFSTR_MIME_BMP = 'image/bmp'; CFSTR_MIME_X_ART = 'image/x-jg'; CFSTR_MIME_X_EMF = 'image/x-emf'; CFSTR_MIME_X_WMF = 'image/x-wmf'; CFSTR_MIME_AVI = 'video/avi'; CFSTR_MIME_MPEG = 'video/mpeg'; CFSTR_MIME_FRACTALS = 'application/fractals'; CFSTR_MIME_RAWDATA = 'application/octet-stream'; CFSTR_MIME_RAWDATASTRM = 'application/octet-stream'; CFSTR_MIME_PDF = 'application/pdf'; CFSTR_MIME_X_AIFF = 'audio/x-aiff'; CFSTR_MIME_X_REALAUDIO = 'audio/x-pn-realaudio'; CFSTR_MIME_XBM = 'image/xbm'; CFSTR_MIME_QUICKTIME = 'video/quicktime'; CFSTR_MIME_X_MSVIDEO = 'video/x-msvideo'; CFSTR_MIME_X_SGI_MOVIE = 'video/x-sgi-movie'; CFSTR_MIME_HTML = 'text/html'; MK_S_ASYNCHRONOUS = $000401E8; S_ASYNCHRONOUS = MK_S_ASYNCHRONOUS; E_PENDING = $8000000A; BINDVERB_GET = $00000000; BINDVERB_POST = $00000001; BINDVERB_PUT = $00000002; BINDVERB_CUSTOM = $00000003; BINDINFOF_URLENCODESTGMEDDATA = $00000001; BINDINFOF_URLENCODEDEXTRAINFO = $00000002; BINDF_ASYNCHRONOUS = $00000001; BINDF_ASYNCSTORAGE = $00000002; BINDF_NOPROGRESSIVERENDERING = $00000004; BINDF_OFFLINEOPERATION = $00000008; BINDF_GETNEWESTVERSION = $00000010; BINDF_NOWRITECACHE = $00000020; BINDF_NEEDFILE = $00000040; BINDF_PULLDATA = $00000080; BINDF_IGNORESECURITYPROBLEM = $00000100; BINDF_RESYNCHRONIZE = $00000200; BINDF_HYPERLINK = $00000400; BINDF_NO_UI = $00000800; BINDF_SILENTOPERATION = $00001000; BINDF_PRAGMA_NO_CACHE = $00002000; BINDF_FREE_THREADED = $00010000; BINDF_DIRECT_READ = $00020000; BINDF_FORMS_SUBMIT = $00040000; BINDF_GETFROMCACHE_IF_NET_FAIL = $00080000; BINDF_DONTUSECACHE = BINDF_GETNEWESTVERSION; BINDF_DONTPUTINCACHE = BINDF_NOWRITECACHE; BINDF_NOCOPYDATA = BINDF_PULLDATA; BSCF_FIRSTDATANOTIFICATION = $00000001; BSCF_INTERMEDIATEDATANOTIFICATION = $00000002; BSCF_LASTDATANOTIFICATION = $00000004; BSCF_DATAFULLYAVAILABLE = $00000008; BSCF_AVAILABLEDATASIZEUNKNOWN = $00000010; BINDSTATUS_FINDINGRESOURCE = 1; BINDSTATUS_CONNECTING = BINDSTATUS_FINDINGRESOURCE+1; BINDSTATUS_REDIRECTING = BINDSTATUS_CONNECTING+1; BINDSTATUS_BEGINDOWNLOADDATA = BINDSTATUS_REDIRECTING+1; BINDSTATUS_DOWNLOADINGDATA = BINDSTATUS_BEGINDOWNLOADDATA+1; BINDSTATUS_ENDDOWNLOADDATA = BINDSTATUS_DOWNLOADINGDATA+1; BINDSTATUS_BEGINDOWNLOADCOMPONENTS = BINDSTATUS_ENDDOWNLOADDATA+1; BINDSTATUS_INSTALLINGCOMPONENTS = BINDSTATUS_BEGINDOWNLOADCOMPONENTS+1; BINDSTATUS_ENDDOWNLOADCOMPONENTS = BINDSTATUS_INSTALLINGCOMPONENTS+1; BINDSTATUS_USINGCACHEDCOPY = BINDSTATUS_ENDDOWNLOADCOMPONENTS+1; BINDSTATUS_SENDINGREQUEST = BINDSTATUS_USINGCACHEDCOPY+1; BINDSTATUS_CLASSIDAVAILABLE = BINDSTATUS_SENDINGREQUEST+1; BINDSTATUS_MIMETYPEAVAILABLE = BINDSTATUS_CLASSIDAVAILABLE+1; BINDSTATUS_CACHEFILENAMEAVAILABLE = BINDSTATUS_MIMETYPEAVAILABLE+1; BINDSTATUS_BEGINSYNCOPERATION = BINDSTATUS_CACHEFILENAMEAVAILABLE+1; BINDSTATUS_ENDSYNCOPERATION = BINDSTATUS_BEGINSYNCOPERATION+1; BINDSTATUS_BEGINUPLOADDATA = BINDSTATUS_ENDSYNCOPERATION+1; BINDSTATUS_UPLOADINGDATA = BINDSTATUS_BEGINUPLOADDATA+1; BINDSTATUS_ENDUPLOADDATA = BINDSTATUS_UPLOADINGDATA+1; BINDSTATUS_PROTOCOLCLASSID = BINDSTATUS_ENDUPLOADDATA+1; BINDSTATUS_ENCODING = BINDSTATUS_PROTOCOLCLASSID+1; BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE = BINDSTATUS_ENCODING+1; BINDSTATUS_CLASSINSTALLLOCATION = BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE+1; BINDSTATUS_DECODING = BINDSTATUS_CLASSINSTALLLOCATION+1; BINDSTATUS_LOADINGMIMEHANDLER = BINDSTATUS_DECODING+1; BINDSTATUS_CONTENTDISPOSITIONATTACH = BINDSTATUS_LOADINGMIMEHANDLER+1; BINDSTATUS_FILTERREPORTMIMETYPE = BINDSTATUS_CONTENTDISPOSITIONATTACH+1; BINDSTATUS_CLSIDCANINSTANTIATE = BINDSTATUS_FILTERREPORTMIMETYPE+1; BINDSTATUS_IUNKNOWNAVAILABLE = BINDSTATUS_CLSIDCANINSTANTIATE+1; BINDSTATUS_DIRECTBIND = BINDSTATUS_IUNKNOWNAVAILABLE+1; BINDSTATUS_RAWMIMETYPE = BINDSTATUS_DIRECTBIND+1; BINDSTATUS_PROXYDETECTING = BINDSTATUS_RAWMIMETYPE+1; BINDSTATUS_ACCEPTRANGES = BINDSTATUS_PROXYDETECTING+1; BINDSTATUS_COOKIE_SENT = BINDSTATUS_ACCEPTRANGES+1; BINDSTATUS_COMPACT_POLICY_RECEIVED = BINDSTATUS_COOKIE_SENT+1; BINDSTATUS_COOKIE_SUPPRESSED = BINDSTATUS_COMPACT_POLICY_RECEIVED+1; BINDSTATUS_COOKIE_STATE_UNKNOWN = BINDSTATUS_COOKIE_SUPPRESSED+1; BINDSTATUS_COOKIE_STATE_ACCEPT = BINDSTATUS_COOKIE_STATE_UNKNOWN+1; BINDSTATUS_COOKIE_STATE_REJECT = BINDSTATUS_COOKIE_STATE_ACCEPT+1; BINDSTATUS_COOKIE_STATE_PROMPT = BINDSTATUS_COOKIE_STATE_REJECT+1; BINDSTATUS_COOKIE_STATE_LEASH = BINDSTATUS_COOKIE_STATE_PROMPT+1; BINDSTATUS_COOKIE_STATE_DOWNGRADE = BINDSTATUS_COOKIE_STATE_LEASH+1; BINDSTATUS_POLICY_HREF = BINDSTATUS_COOKIE_STATE_DOWNGRADE+1; BINDSTATUS_P3P_HEADER = BINDSTATUS_POLICY_HREF+1; BINDSTATUS_SESSION_COOKIE_RECEIVED = BINDSTATUS_P3P_HEADER+1; BINDSTATUS_PERSISTENT_COOKIE_RECEIVED = BINDSTATUS_SESSION_COOKIE_RECEIVED+1; BINDSTATUS_SESSION_COOKIES_ALLOWED = BINDSTATUS_PERSISTENT_COOKIE_RECEIVED+1; BINDSTRING_HEADERS = 1; BINDSTRING_ACCEPT_MIMES = BINDSTRING_HEADERS+1; BINDSTRING_EXTRA_URL = BINDSTRING_ACCEPT_MIMES+1; BINDSTRING_LANGUAGE = BINDSTRING_EXTRA_URL+1; BINDSTRING_USERNAME = BINDSTRING_LANGUAGE+1; BINDSTRING_PASSWORD = BINDSTRING_USERNAME+1; BINDSTRING_UA_PIXELS = BINDSTRING_PASSWORD+1; BINDSTRING_UA_COLOR = BINDSTRING_UA_PIXELS+1; BINDSTRING_OS = BINDSTRING_UA_COLOR+1; BINDSTRING_USER_AGENT = BINDSTRING_OS+1; BINDSTRING_ACCEPT_ENCODINGS = BINDSTRING_USER_AGENT+1; BINDSTRING_POST_COOKIE = BINDSTRING_ACCEPT_ENCODINGS+1; BINDSTRING_POST_DATA_MIME = BINDSTRING_POST_COOKIE+1; BINDSTRING_URL = BINDSTRING_POST_DATA_MIME+1; INET_E_INVALID_URL = HResult($800C0002); INET_E_NO_SESSION = HResult($800C0003); INET_E_CANNOT_CONNECT = HResult($800C0004); INET_E_RESOURCE_NOT_FOUND = HResult($800C0005); INET_E_OBJECT_NOT_FOUND = HResult($800C0006); INET_E_DATA_NOT_AVAILABLE = HResult($800C0007); INET_E_DOWNLOAD_FAILURE = HResult($800C0008); INET_E_AUTHENTICATION_REQUIRED = HResult($800C0009); INET_E_NO_VALID_MEDIA = HResult($800C000A); INET_E_CONNECTION_TIMEOUT = HResult($800C000B); INET_E_INVALID_REQUEST = HResult($800C000C); INET_E_UNKNOWN_PROTOCOL = HResult($800C000D); INET_E_SECURITY_PROBLEM = HResult($800C000E); INET_E_CANNOT_LOAD_DATA = HResult($800C000F); INET_E_CANNOT_INSTANTIATE_OBJECT = HResult($800C0010); INET_E_REDIRECT_FAILED = HResult($800C0014); INET_E_REDIRECT_TO_DIR = HResult($800C0015); INET_E_CANNOT_LOCK_REQUEST = HResult($800C0016); INET_E_ERROR_FIRST = HResult($800C0002); INET_E_ERROR_LAST = INET_E_REDIRECT_TO_DIR; CIP_DISK_FULL = 0; CIP_ACCESS_DENIED = CIP_DISK_FULL+1; CIP_NEWER_VERSION_EXISTS = CIP_ACCESS_DENIED+1; CIP_OLDER_VERSION_EXISTS = CIP_NEWER_VERSION_EXISTS+1; CIP_NAME_CONFLICT = CIP_OLDER_VERSION_EXISTS+1; CIP_TRUST_VERIFICATION_COMPONENT_MISSING = CIP_NAME_CONFLICT+1; CIP_EXE_SELF_REGISTERATION_TIMEOUT = CIP_TRUST_VERIFICATION_COMPONENT_MISSING+1; CIP_UNSAFE_TO_ABORT = CIP_EXE_SELF_REGISTERATION_TIMEOUT+1; CIP_NEED_REBOOT = CIP_UNSAFE_TO_ABORT+1; URLOSTRM_USECACHEDCOPY_ONLY = $00000001; URLOSTRM_USECACHEDCOPY = $00000002; URLOSTRM_GETNEWESTVERSION = $00000003; WININETINFO_OPTION_LOCK_HANDLE = 65534; PI_PARSE_URL = $00000001; PI_FILTER_MODE = $00000002; PI_FORCE_ASYNC = $00000004; PI_USE_WORKERTHREAD = $00000008; PI_MIMEVERIFICATION = $00000010; PI_CLSIDLOOKUP = $00000020; PI_DATAPROGRESS = $00000040; PI_SYNCHRONOUS = $00000080; PI_APARTMENTTHREADED = $00000100; PI_CLASSINSTALL = $00000200; PD_FORCE_SWITCH = $00010000; PI_DOCFILECLSIDLOOKUP = PI_CLSIDLOOKUP; OIBDG_APARTMENTTHREADED = $00000100; PARSE_CANONICALIZE = 1; PARSE_FRIENDLY = PARSE_CANONICALIZE+1; PARSE_SECURITY_URL = PARSE_FRIENDLY+1; PARSE_ROOTDOCUMENT = PARSE_SECURITY_URL+1; PARSE_DOCUMENT = PARSE_ROOTDOCUMENT+1; PARSE_ANCHOR = PARSE_DOCUMENT+1; PARSE_ENCODE = PARSE_ANCHOR+1; PARSE_DECODE = PARSE_ENCODE+1; PARSE_PATH_FROM_URL = PARSE_DECODE+1; PARSE_URL_FROM_PATH = PARSE_PATH_FROM_URL+1; PARSE_MIME = PARSE_URL_FROM_PATH+1; PARSE_SERVER = PARSE_MIME+1; PARSE_SCHEMA = PARSE_SERVER+1; PARSE_SITE = PARSE_SCHEMA+1; PARSE_DOMAIN = PARSE_SITE+1; PARSE_LOCATION = PARSE_DOMAIN+1; PARSE_SECURITY_DOMAIN = PARSE_LOCATION+1; PSU_DEFAULT = 1; PSU_SECURITY_URL_ONLY = PSU_DEFAULT+1; QUERY_EXPIRATION_DATE = 1; QUERY_TIME_OF_LAST_CHANGE = QUERY_EXPIRATION_DATE+1; QUERY_CONTENT_ENCODING = QUERY_TIME_OF_LAST_CHANGE+1; QUERY_CONTENT_TYPE = QUERY_CONTENT_ENCODING+1; QUERY_REFRESH = QUERY_CONTENT_TYPE+1; QUERY_RECOMBINE = QUERY_REFRESH+1; QUERY_CAN_NAVIGATE = QUERY_RECOMBINE+1; QUERY_USES_NETWORK = QUERY_CAN_NAVIGATE+1; QUERY_IS_CACHED = QUERY_USES_NETWORK+1; QUERY_IS_INSTALLEDENTRY = QUERY_IS_CACHED+1; QUERY_IS_CACHED_OR_MAPPED = QUERY_IS_INSTALLEDENTRY+1; QUERY_USES_CACHE = QUERY_IS_CACHED_OR_MAPPED+1; INET_E_USE_DEFAULT_PROTOCOLHANDLER = HResult($800C0011); INET_E_USE_DEFAULT_SETTING = HResult($800C0012); INET_E_DEFAULT_ACTION = HResult($800C0011); INET_E_QUERYOPTION_UNKNOWN = HResult($800C0013); INET_E_REDIRECTING = HResult($800C0014); PROTOCOLFLAG_NO_PICS_CHECK = $00000001; URLACTION_MIN = $00001000; URLACTION_DOWNLOAD_MIN = $00001000; URLACTION_DOWNLOAD_SIGNED_ACTIVEX = $00001001; URLACTION_DOWNLOAD_UNSIGNED_ACTIVEX = $00001004; URLACTION_DOWNLOAD_CURR_MAX = $00001004; URLACTION_DOWNLOAD_MAX = $000011FF; URLACTION_ACTIVEX_MIN = $00001200; URLACTION_ACTIVEX_RUN = $00001200; URLACTION_ACTIVEX_OVERRIDE_OBJECT_SAFETY = $00001201; URLACTION_ACTIVEX_OVERRIDE_DATA_SAFETY = $00001202; URLACTION_ACTIVEX_OVERRIDE_SCRIPT_SAFETY = $00001203; URLACTION_SCRIPT_OVERRIDE_SAFETY = $00001401; URLACTION_ACTIVEX_CONFIRM_NOOBJECTSAFETY = $00001204; URLACTION_ACTIVEX_TREATASUNTRUSTED = $00001205; URLACTION_ACTIVEX_CURR_MAX = $00001205; URLACTION_ACTIVEX_MAX = $000013FF; URLACTION_SCRIPT_MIN = $00001400; URLACTION_SCRIPT_RUN = $00001400; URLACTION_SCRIPT_JAVA_USE = $00001402; URLACTION_SCRIPT_SAFE_ACTIVEX = $00001405; URLACTION_SCRIPT_CURR_MAX = $00001405; URLACTION_SCRIPT_MAX = $000015FF; URLACTION_HTML_MIN = $00001600; URLACTION_HTML_SUBMIT_FORMS = $00001601; URLACTION_HTML_SUBMIT_FORMS_FROM = $00001602; URLACTION_HTML_SUBMIT_FORMS_TO = $00001603; URLACTION_HTML_FONT_DOWNLOAD = $00001604; URLACTION_HTML_JAVA_RUN = $00001605; URLACTION_HTML_CURR_MAX = $00001605; URLACTION_HTML_MAX = $000017FF; URLACTION_SHELL_MIN = $00001800; URLACTION_SHELL_INSTALL_DTITEMS = $00001800; URLACTION_SHELL_MOVE_OR_COPY = $00001802; URLACTION_SHELL_FILE_DOWNLOAD = $00001803; URLACTION_SHELL_VERB = $00001804; URLACTION_SHELL_WEBVIEW_VERB = $00001805; URLACTION_SHELL_CURR_MAX = $00001805; URLACTION_SHELL_MAX = $000019ff; URLACTION_NETWORK_MIN = $00001A00; URLACTION_CREDENTIALS_USE = $00001A00; URLPOLICY_CREDENTIALS_SILENT_LOGON_OK = $00000000; URLPOLICY_CREDENTIALS_MUST_PROMPT_USER = $00010000; URLPOLICY_CREDENTIALS_CONDITIONAL_PROMPT = $00020000; URLPOLICY_CREDENTIALS_ANONYMOUS_ONLY = $00030000; URLACTION_AUTHENTICATE_CLIENT = $00001A01; URLPOLICY_AUTHENTICATE_CLEARTEXT_OK = $00000000; URLPOLICY_AUTHENTICATE_CHALLENGE_RESPONSE = $00010000; URLPOLICY_AUTHENTICATE_MUTUAL_ONLY = $00030000; URLACTION_NETWORK_CURR_MAX = $00001A01; URLACTION_NETWORK_MAX = $00001BFF; URLACTION_JAVA_MIN = $00001C00; URLACTION_JAVA_PERMISSIONS = $00001C00; URLPOLICY_JAVA_PROHIBIT = $00000000; URLPOLICY_JAVA_HIGH = $00010000; URLPOLICY_JAVA_MEDIUM = $00020000; URLPOLICY_JAVA_LOW = $00030000; URLPOLICY_JAVA_CUSTOM = $00800000; URLACTION_JAVA_CURR_MAX = $00001C00; URLACTION_JAVA_MAX = $00001CFF; URLACTION_INFODELIVERY_MIN = $00001D00; URLACTION_INFODELIVERY_NO_ADDING_CHANNELS = $00001D00; URLACTION_INFODELIVERY_NO_EDITING_CHANNELS = $00001D01; URLACTION_INFODELIVERY_NO_REMOVING_CHANNELS = $00001D02; URLACTION_INFODELIVERY_NO_ADDING_SUBSCRIPTIONS = $00001D03; URLACTION_INFODELIVERY_NO_EDITING_SUBSCRIPTIONS = $00001D04; URLACTION_INFODELIVERY_NO_REMOVING_SUBSCRIPTIONS = $00001D05; URLACTION_INFODELIVERY_NO_CHANNEL_LOGGING = $00001D06; URLACTION_INFODELIVERY_CURR_MAX = $00001D06; URLACTION_INFODELIVERY_MAX = $00001Dff; URLACTION_CHANNEL_SOFTDIST_MIN = $00001E00; URLACTION_CHANNEL_SOFTDIST_PERMISSIONS = $00001E05; URLPOLICY_CHANNEL_SOFTDIST_PROHIBIT = $00010000; URLPOLICY_CHANNEL_SOFTDIST_PRECACHE = $00020000; URLPOLICY_CHANNEL_SOFTDIST_AUTOINSTALL = $00030000; URLACTION_CHANNEL_SOFTDIST_MAX = $00001EFF; URLPOLICY_ALLOW = $00; URLPOLICY_QUERY = $01; URLPOLICY_DISALLOW = $03; URLPOLICY_NOTIFY_ON_ALLOW = $10; URLPOLICY_NOTIFY_ON_DISALLOW = $20; URLPOLICY_LOG_ON_ALLOW = $40; URLPOLICY_LOG_ON_DISALLOW = $80; URLPOLICY_MASK_PERMISSIONS = $0f; MAX_SIZE_SECURITY_ID = 512; PUAF_DEFAULT = $00000000; PUAF_NOUI = $00000001; PUAF_ISFILE = $00000002; PUAF_WARN_IF_DENIED = $00000004; PUAF_FORCEUI_FOREGROUND = $00000008; PUAF_CHECK_TIFS = $00000010; SZM_CREATE = $00000000; SZM_DELETE = $00000001; URLZONE_PREDEFINED_MIN = 0; URLZONE_LOCAL_MACHINE = 0; URLZONE_INTRANET = URLZONE_LOCAL_MACHINE+1; URLZONE_TRUSTED = URLZONE_INTRANET+1; URLZONE_INTERNET = URLZONE_TRUSTED+1; URLZONE_UNTRUSTED = URLZONE_INTERNET+1; URLZONE_PREDEFINED_MAX = 999; URLZONE_USER_MIN = 1000; URLZONE_USER_MAX = 10000; URLZONEREG_DEFAULT = 0; URLZONEREG_HKLM = URLZONEREG_DEFAULT+1; URLZONEREG_HKCU = URLZONEREG_HKLM+1; URLTEMPLATE_CUSTOM = $00000000; URLTEMPLATE_PREDEFINED_MIN = $00010000; URLTEMPLATE_LOW = $00010000; URLTEMPLATE_MEDIUM = $00011000; URLTEMPLATE_HIGH = $00012000; URLTEMPLATE_PREDEFINED_MAX = $00020000; MAX_ZONE_PATH = 260; MAX_ZONE_DESCRIPTION = 200; ZAFLAGS_CUSTOM_EDIT = $00000001; ZAFLAGS_ADD_SITES = $00000002; ZAFLAGS_REQUIRE_VERIFICATION = $00000004; ZAFLAGS_INCLUDE_PROXY_OVERRIDE = $00000008; ZAFLAGS_INCLUDE_INTRANET_SITES = $00000010; ZAFLAGS_NO_UI = $00000020; ZAFLAGS_SUPPORTS_VERIFICATION = $00000040; ZAFLAGS_UNC_AS_INTRANET = $00000080; SOFTDIST_FLAG_USAGE_EMAIL = $00000001; SOFTDIST_FLAG_USAGE_PRECACHE = $00000002; SOFTDIST_FLAG_USAGE_AUTOINSTALL = $00000004; SOFTDIST_FLAG_DELETE_SUBSCRIPTION = $00000008; SOFTDIST_ADSTATE_NONE = $00000000; SOFTDIST_ADSTATE_AVAILABLE = $00000001; SOFTDIST_ADSTATE_DOWNLOADED = $00000002; SOFTDIST_ADSTATE_INSTALLED = $00000003; Type PHWnd = ^HWND; PIunknown = ^IUnknown; PIEnumString = ^IENumString; PStgMedium = ^TStgMedium; TUrlZoneReg = Cardinal; TParseAction = Cardinal; TQueryOption = Cardinal; TPSUAction = Cardinal; PLPCWSTR = ^LPCWSTR; PPOLEStr = ^POLEStr; PIBindCtx = ^IBindCtx; PIEnumFormatEtc = ^IEnumFormatEtc; PIstream = ^IStream; // Forward declarations IInternetProtocolSink = Interface; IBinding = interface; IInternetProtocol = interface; TBINDINFO = packed record cbSize : ULONG; szExtraInfo : LPWSTR; stgmedData : TStgMedium; grfBindInfoF : DWORD; dwBindVerb : DWORD; szCustomVerb : LPWSTR; cbstgmedData : DWORD; dwOptions : DWORD; dwOptionsFlags : DWORD; dwCodePage : DWORD; securityAttributes : SECURITY_ATTRIBUTES; iid : TGUID; pUnk : IUnknown; dwReserved : DWORD; end; BINDINFO = TBINDINFO; PBINDINFO = ^TBINDINFO; TREMSECURITY_ATTRIBUTES = packed record nLength : DWORD; lpSecurityDescriptor : DWORD; bInheritHandle : BOOL; end; REMSECURITY_ATTRIBUTES = TREMSECURITY_ATTRIBUTES; PREMSECURITY_ATTRIBUTES = ^TREMSECURITY_ATTRIBUTES; TRemBINDINFO = packed record cbSize : ULONG; szExtraInfo : LPWSTR; grfBindInfoF : DWORD; dwBindVerb : DWORD; szCustomVerb : LPWSTR; cbstgmedData : DWORD; dwOptions : DWORD; dwOptionsFlags : DWORD; dwCodePage : DWORD; securityAttributes : TREMSECURITY_ATTRIBUTES; iid : TGUID; pUnk : IUnknown; dwReserved : DWORD; end; PRemBINDINFO = ^TRemBINDINFO; RemBINDINFO = TRemBINDINFO; TRemFORMATETC = packed record cfFormat : DWORD; ptd : DWORD; dwAspect : DWORD; lindex : Longint; tymed : DWORD; end; RemFORMATETC = TRemFORMATETC; PRemFORMATETC = ^TRemFORMATETC; TPROTOCOLDATA = packed record grfFlags : DWORD; dwState : DWORD; pData : Pointer; cbData : ULONG; end; PROTOCOLDATA = TPROTOCOLDATA; PPROTOCOLDATA = ^PROTOCOLDATA; TZONEATTRIBUTES = packed record cbSize : ULONG; szDisplayName : array [0..259] of WideChar; szDescription : array [0..199] of WideChar; szIconPath : array [0..259] of WideChar; dwTemplateMinLevel : DWORD; dwTemplateRecommended : DWORD; dwTemplateCurrentLevel : DWORD; dwFlags : DWORD; end; ZONEATTRIBUTES = TZONEATTRIBUTES; PZONEATTRIBUTES = ^TZONEATTRIBUTES; TCODEBASEHOLD = packed record cbSize : ULONG; szDistUnit : LPWSTR; szCodeBase : LPWSTR; dwVersionMS : DWORD; dwVersionLS : DWORD; dwStyle : DWORD; end; CODEBASEHOLD = TCODEBASEHOLD; PCODEBASEHOLD = ^TCODEBASEHOLD; TSOFTDISTINFO = packed record cbSize : ULONG; dwFlags : DWORD; dwAdState : DWORD; szTitle : LPWSTR; szAbstract : LPWSTR; szHREF : LPWSTR; dwInstalledVersionMS : DWORD; dwInstalledVersionLS : DWORD; dwUpdateVersionMS : DWORD; dwUpdateVersionLS : DWORD; dwAdvertisedVersionMS : DWORD; dwAdvertisedVersionLS : DWORD; dwReserved : DWORD; end; SOFTDISTINFO = TSOFTDISTINFO; PSOFTDISTINFO = ^TSOFTDISTINFO; TPROTOCOLFILTERDATA = packed record cbSize : DWORD; ProtocolSink : IInternetProtocolSink; Protocol : IInternetProtocol; Unk : IUnknown; dwFilterFlags : DWORD; end; PROTOCOLFILTERDATA = TPROTOCOLFILTERDATA; PPROTOCOLFILTERDATA = ^TPROTOCOLFILTERDATA; TDATAINFO = packed record ulTotalSize : ULONG; ulavrPacketSize : ULONG; ulConnectSpeed : ULONG; ulProcessorSpeed : ULONG; end; DATAINFO = TDATAINFO; PDATAINFO = ^TDATAINFO; THIT_LOGGING_INFO = packed record dwStructSize : DWORD; lpszLoggedUrlName : LPSTR; StartTime : TSystemTime; EndTime : TSystemTime; lpszExtendedInfo : LPSTR; end; HIT_LOGGING_INFO = THIT_LOGGING_INFO; PHIT_LOGGING_INFO = ^THIT_LOGGING_INFO; IPersistMonikerRaw = interface['{79eac9c9-baf9-11ce-8c82-00aa004ba90b}'] Function GetClassID(ClassID : PCLSID) : HResult; stdcall; Function IsDirty : HResult; stdcall; Function Load(fFullyAvailable : BOOL; pimkName : IMoniker; pibc : IBindCtx; grfMode : DWORD) : HResult; stdcall; Function Save(pimkName : IMoniker; pbc : IBindCtx; fRemember : BOOL) : HResult; stdcall; Function SaveCompleted(pimkName : IMoniker; pibc : IBindCtx) : HResult; stdcall; Function GetCurMoniker(ppimkName : IMoniker) : HResult; stdcall; end; PIPersistMonikerRaw = ^IPersistMonikerRaw; IPersistMoniker = interface['{79eac9c9-baf9-11ce-8c82-00aa004ba90b}'] Function GetClassID(out ClassID : TCLSID) : HResult; stdcall; Function IsDirty : HResult; stdcall; Function Load(fFullyAvailable : BOOL; pimkName : IMoniker; pibc : IBindCtx; grfMode : DWORD) : HResult; stdcall; Function Save(pimkName : IMoniker; pbc : IBindCtx; fRemember : BOOL) : HResult; stdcall; Function SaveCompleted(pimkName : IMoniker; pibc : IBindCtx) : HResult; stdcall; Function GetCurMoniker(ppimkName : IMoniker) : HResult; stdcall; end; PIPersistMoniker = ^IPersistMoniker; IBindingRaw = interface ['{79eac9c0-baf9-11ce-8c82-00aa004ba90b}'] Function Abort : HResult; stdcall; Function Suspend : HResult; stdcall; Function Resume : HResult; stdcall; Function SetPriority(nPriority : Longint) : HResult; stdcall; Function GetPriority(nPriority : PLongint) : HResult; stdcall; Function GetBindResult(clsidProtocol : PCLSID; dwResult : PDWORD; szResult : PPOLEStr; dwReserved : DWORD) : HResult; stdcall; end; PIBindingRaw = ^IBindingRaw; IBinding = interface ['{79eac9c0-baf9-11ce-8c82-00aa004ba90b}'] Function Abort : HResult; stdcall; Function Suspend : HResult; stdcall; Function Resume : HResult; stdcall; Function SetPriority(nPriority : Longint) : HResult; stdcall; Function GetPriority(out nPriority : Longint) : HResult; stdcall; Function GetBindResult(out clsidProtocol : TCLSID; out dwResult : DWORD; out szResult : POLEStr; dwReserved : DWORD) : HResult; stdcall; end; PIBinding = ^IBinding; IBindProtocolRaw = interface['{79eac9cd-baf9-11ce-8c82-00aa004ba90b}'] Function CreateBinding(szUrl : LPCWSTR; pbc : IBindCtx; ppb : PIBindingRaw) : HResult; stdcall; end; PIBindProtocolRaw = ^IBindProtocolRaw; IBindProtocol = interface['{79eac9cd-baf9-11ce-8c82-00aa004ba90b}'] Function CreateBinding(szUrl : LPCWSTR; pbc : IBindCtx; out ppb : IBinding) : HResult; stdcall; end; PIBindProtocol = ^IBindProtocol; IBindStatusCallbackRaw = interface['{79eac9c1-baf9-11ce-8c82-00aa004ba90b}'] Function OnStartBinding(dwReserved : DWORD; pib : IBindingRaw) : HResult; stdcall; Function GetPriority(nPriority : Pointer) : HResult; stdcall; Function OnLowResource(reserved : DWORD) : HResult; stdcall; Function OnProgress(ulProgress, ulProgressMax, ulStatusCode : ULONG; szStatusText : LPCWSTR) : HResult; stdcall; Function OnStopBinding(hresult : HResult; szError : LPCWSTR) : HResult; stdcall; Function GetBindInfo(grfBINDF : PDWORD; bindinfo : PBINDINFO) : HResult; stdcall; Function OnDataAvailable(grfBSCF : DWORD; dwSize : DWORD; formatetc : PFormatEtc; stgmed : PStgMedium) : HResult; stdcall; Function OnObjectAvailable(const iid : TGUID; punk : IUnknown) : HResult; stdcall; end; PIBindStatusCallbackRaw = ^IBindStatusCallbackRaw; IBindStatusCallback = interface['{79eac9c1-baf9-11ce-8c82-00aa004ba90b}'] Function OnStartBinding(dwReserved : DWORD; pib : IBinding) : HResult; stdcall; Function GetPriority(out nPriority) : HResult; stdcall; Function OnLowResource(reserved : DWORD) : HResult; stdcall; Function OnProgress(ulProgress, ulProgressMax, ulStatusCode : ULONG; szStatusText : LPCWSTR) : HResult; stdcall; Function OnStopBinding(hresult : HResult; szError : LPCWSTR) : HResult; stdcall; Function GetBindInfo(out grfBINDF : DWORD; var bindinfo : TBindInfo) : HResult; stdcall; Function OnDataAvailable(grfBSCF : DWORD; dwSize : DWORD; formatetc : PFormatEtc; stgmed : PStgMedium) : HResult; stdcall; Function OnObjectAvailable(const iid : TGUID; punk : IUnknown) : HResult; stdcall; end; PIBindStatusCallback = ^IBindStatusCallback; IAuthenticateRaw = interface['{79eac9d0-baf9-11ce-8c82-00aa004ba90b}'] Function Authenticate(hwnd : PHWnd; szUserName, szPassWord : PLPWSTR) : HResult; stdcall; end; PIAuthenticateRaw = ^IAuthenticateRaw; IAuthenticate = interface['{79eac9d0-baf9-11ce-8c82-00aa004ba90b}'] Function Authenticate(var hwnd : HWnd; var szUserName, szPassWord : LPWSTR) : HResult; stdcall; end; PIAuthenticate = ^IAuthenticate; IHttpNegotiateRaw = interface['{79eac9d2-baf9-11ce-8c82-00aa004ba90b}'] Function BeginningTransaction(szURL, szHeaders : LPCWSTR; dwReserved : DWORD; szAdditionalHeaders : PLPWSTR) : HResult; stdcall; Function OnResponse(dwResponseCode : DWORD; szResponseHeaders, szRequestHeaders : LPCWSTR; szAdditionalRequestHeaders : PLPWSTR) : HResult; stdcall; end; PIHttpNegotiateRaw = ^IHttpNegotiateRaw; IHttpNegotiate = interface['{79eac9d2-baf9-11ce-8c82-00aa004ba90b}'] Function BeginningTransaction(szURL, szHeaders : LPCWSTR; dwReserved : DWORD; out szAdditionalHeaders : LPWSTR) : HResult; stdcall; Function OnResponse(dwResponseCode : DWORD; szResponseHeaders, szRequestHeaders : LPCWSTR; out szAdditionalRequestHeaders : LPWSTR) : HResult; stdcall; end; PIHttpNegotiate = ^IHttpNegotiate; IWindowForBindingUIRaw = interface['{79eac9d5-bafa-11ce-8c82-00aa004ba90b}'] Function GetWindow(const guidReason : TGUID; hwnd : Pointer) : HResult; stdcall; end; PIWindowForBindingUIRaw = ^IWindowForBindingUIRaw; IWindowForBindingUI = interface['{79eac9d5-bafa-11ce-8c82-00aa004ba90b}'] Function GetWindow(const guidReason : TGUID; out hwnd) : HResult; stdcall; end; PIWindowForBindingUI = ^IWindowForBindingUI; ICodeInstallRaw = interface(IWindowForBindingUI)['{79eac9d1-baf9-11ce-8c82-00aa004ba90b}'] Function OnCodeInstallProblem(ulStatusCode : ULONG; szDestination, szSource : LPCWSTR; dwReserved : DWORD) : HResult; stdcall; end; ICodeInstall = ICodeInstallRaw; PICodeInstall = ^ICodeInstall; IWinInetInfoRaw = interface['{79eac9d6-bafa-11ce-8c82-00aa004ba90b}'] Function QueryOption(dwOption : DWORD; Buffer : Pointer; cbBuf : PDWORD) : HResult; stdcall; end; PIWinInetInfoRaw = ^IWinInetInfoRaw; IWinInetInfo = interface['{79eac9d6-bafa-11ce-8c82-00aa004ba90b}'] Function QueryOption(dwOption : DWORD; Buffer : Pointer; var cbBuf : DWORD) : HResult; stdcall; end; PIWinInetInfo = ^IWinInetInfo; IHttpSecurityRaw = interface(IWindowForBindingUIRaw)['{79eac9d7-bafa-11ce-8c82-00aa004ba90b}'] Function OnSecurityProblem(dwProblem : DWORD) : HResult; stdcall; end; PIHttpSecurityRaw = ^IHttpSecurityRaw; IHttpSecurity = interface(IWindowForBindingUI)['{79eac9d7-bafa-11ce-8c82-00aa004ba90b}'] Function OnSecurityProblem(dwProblem : DWORD) : HResult; stdcall; end; PIHttpSecurity = ^IHttpSecurity; IWinInetHttpInfoRaw = interface(IWinInetInfoRaw)['{79eac9d8-bafa-11ce-8c82-00aa004ba90b}'] Function QueryInfo(dwOption : DWORD; Buffer : Pointer; cbBuf, dwFlags, dwReserved : PDWORD) : HResult; stdcall; end; PIWinInetHttpInfoRaw = ^IWinInetHttpInfoRaw; IWinInetHttpInfo = interface(IWinInetInfoRaw)['{79eac9d8-bafa-11ce-8c82-00aa004ba90b}'] Function QueryInfo(dwOption : DWORD; Buffer : Pointer; var cbBuf, dwFlags, dwReserved : DWORD) : HResult; stdcall; end; PIWinInetHttpInfo = ^IWinInetHttpInfo; IBindHostRaw = interface['{fc4801a1-2ba9-11cf-a229-00aa003d7352}'] Function CreateMoniker(szName : POLEStr; BC : IBindCtx; mk : PIMoniker; dwReserved : DWORD) : HResult; stdcall; Function MonikerBindToStorage(Mk : IMoniker; BC : IBindCtx; BSC : IBindStatusCallback; const iid : TGUID; pvObj : PPointer) : HResult; stdcall; Function MonikerBindToObject(Mk : IMoniker; BC : IBindCtx; BSC : IBindStatusCallback; const iid : TGUID; pvObj : PPointer) : HResult; stdcall; end; PIBindHostRaw = ^IBindHostRaw; IBindHost = interface['{fc4801a1-2ba9-11cf-a229-00aa003d7352}'] Function CreateMoniker(szName : POLEStr; BC : IBindCtx; out mk : IMoniker; dwReserved : DWORD) : HResult; stdcall; Function MonikerBindToStorage(Mk : IMoniker; BC : IBindCtx; BSC : IBindStatusCallback; const iid : TGUID; out pvObj : Pointer) : HResult; stdcall; Function MonikerBindToObject(Mk : IMoniker; BC : IBindCtx; BSC : IBindStatusCallback; const iid : TGUID; out pvObj : Pointer) : HResult; stdcall; end; PIBindHost = ^IBindHost; IInternetRaw = interface['{79eac9e0-baf9-11ce-8c82-00aa004ba90b}'] end; PIInternetRaw = ^IInternetRaw; IInternet = IInternetRaw; PIInternet = PIInternetRaw; IInternetBindInfoRaw = interface ['{79eac9e1-baf9-11ce-8c82-00aa004ba90b}'] Function GetBindInfo(grfBINDF : PDWORD; bindinfo : PBindInfo) : HResult; stdcall; Function GetBindString(ulStringType : ULONG; wzStr : POLEStr; cEl : ULONG; cElFetched : PULONG) : HResult; stdcall; end; PIInternetBindInfoRaw = ^IInternetBindInfoRaw; IInternetBindInfo = interface ['{79eac9e1-baf9-11ce-8c82-00aa004ba90b}'] Function GetBindInfo(out grfBINDF : DWORD; var bindinfo : TBindInfo) : HResult; stdcall; Function GetBindString(ulStringType : ULONG; wzStr : POLEStr; cEl : ULONG; var cElFetched : ULONG) : HResult; stdcall; end; PIInternetBindInfo = ^IInternetBindInfo; IInternetProtocolRootRaw = interface ['{79eac9e3-baf9-11ce-8c82-00aa004ba90b}'] Function Start(szUrl : LPCWSTR; OIProtSink : IInternetProtocolSink; OIBindInfo : IInternetBindInfo; grfPI, dwReserved : DWORD) : HResult; stdcall; Function Continue(const ProtocolData : TProtocolData) : HResult; stdcall; Function Abort(hrReason : HResult; dwOptions : DWORD) : HResult; stdcall; Function Terminate(dwOptions : DWORD) : HResult; stdcall; Function Suspend : HResult; stdcall; Function Resume : HResult; stdcall; end; PIInternetProtocolRootRaw = ^IInternetProtocolRootRaw; IInternetProtocolRoot = IInternetProtocolRootRaw; PIInternetProtocolRoot = PIInternetProtocolRootRaw; IInternetProtocolRaw = interface(IInternetProtocolRootRaw)['{79eac9e4-baf9-11ce-8c82-00aa004ba90b}'] Function Read(pv : Pointer; cb : ULONG; cbRead : PULONG) : HResult; stdcall; Function Seek(dlibMove : LARGE_INTEGER; dwOrigin : DWORD; libNewPosition : PULARGE_INTEGER) : HResult; stdcall; Function LockRequest(dwOptions : DWORD) : HResult; stdcall; Function UnlockRequest : HResult; stdcall; end; PIInternetProtocolRaw = ^IInternetProtocolRaw; IInternetProtocol = interface(IInternetProtocolRoot)['{79eac9e4-baf9-11ce-8c82-00aa004ba90b}'] Function Read(pv : Pointer; cb : ULONG; out cbRead : ULONG) : HResult; stdcall; Function Seek(dlibMove : LARGE_INTEGER; dwOrigin : DWORD; out libNewPosition : ULARGE_INTEGER) : HResult; stdcall; Function LockRequest(dwOptions : DWORD) : HResult; stdcall; Function UnlockRequest : HResult; stdcall; end; PIInternetProtocol = ^IInternetProtocol; IInternetProtocolSink = interface['{79eac9e5-baf9-11ce-8c82-00aa004ba90b}'] Function Switch(const ProtocolData : TProtocolData) : HResult; stdcall; Function ReportProgress(ulStatusCode : ULONG; szStatusText : LPCWSTR) : HResult; stdcall; Function ReportData(grfBSCF : DWORD; ulProgress, ulProgressMax : ULONG) : HResult; stdcall; Function ReportResult(hrResult : HResult; dwError : DWORD; szResult : LPCWSTR) : HResult; stdcall; end; PIInternetProtocolSink = ^IInternetProtocolSink; IInternetProtocolSinkRaw = IInternetProtocolSink; // Because of the forward declaration, we must do it like this. PIInternetProtocolSinkRaw = PIInternetProtocolSink; IInternetSessionRaw = interface['{79eac9e7-baf9-11ce-8c82-00aa004ba90b}'] Function RegisterNameSpace(CF : IClassFactory; const clsid : TCLSID; pwzProtocol : LPCWSTR; cPatterns : ULONG; const pwzPatterns : PLPCWSTR; dwReserved : DWORD) : HResult; stdcall; Function UnregisterNameSpace(CF : IClassFactory; pszProtocol : LPCWSTR) : HResult; stdcall; Function RegisterMimeFilter(CF : IClassFactory; const rclsid : TCLSID; pwzType : LPCWSTR) : HResult; stdcall; Function UnregisterMimeFilter(CF : IClassFactory; pwzType : LPCWSTR) : HResult; stdcall; Function CreateBinding(BC : IBindCtx; szUrl : LPCWSTR; UnkOuter : IUnknown; Unk : PIUnknown; OINetProt : PIInternetProtocol; dwOption : DWORD) : HResult; stdcall; Function SetSessionOption(dwOption : DWORD; pBuffer : Pointer; dwBufferLength : DWORD; dwReserved : DWORD) : HResult; stdcall; Function GetSessionOption(dwOption : DWORD; pBuffer : Pointer; dwBufferLength : PDWORD; dwReserved : DWORD) : HResult; stdcall; end; PIInternetSessionRaw = ^IInternetSessionRaw; IInternetSession = interface['{79eac9e7-baf9-11ce-8c82-00aa004ba90b}'] Function RegisterNameSpace(CF : IClassFactory; const clsid : TCLSID; pwzProtocol : LPCWSTR; cPatterns : ULONG; const pwzPatterns : PLPCWSTR; dwReserved : DWORD) : HResult; stdcall; Function UnregisterNameSpace(CF : IClassFactory; pszProtocol : LPCWSTR) : HResult; stdcall; Function RegisterMimeFilter(CF : IClassFactory; const rclsid : TCLSID; pwzType : LPCWSTR) : HResult; stdcall; Function UnregisterMimeFilter(CF : IClassFactory; pwzType : LPCWSTR) : HResult; stdcall; Function CreateBinding(BC : IBindCtx; szUrl : LPCWSTR; UnkOuter : IUnknown; out Unk : IUnknown; out OINetProt : IInternetProtocol; dwOption : DWORD) : HResult; stdcall; Function SetSessionOption(dwOption : DWORD; pBuffer : Pointer; dwBufferLength : DWORD; dwReserved : DWORD) : HResult; stdcall; Function GetSessionOption(dwOption : DWORD; pBuffer : Pointer; var dwBufferLength : DWORD; dwReserved : DWORD) : HResult; stdcall; end; PIInternetSession = ^IInternetSession; IInternetThreadSwitchRaw = interface ['{79eac9e8-baf9-11ce-8c82-00aa004ba90b}'] Function Prepare : HResult; stdcall; Function Continue : HResult; stdcall; end; PIInternetThreadSwitchRaw = ^IInternetThreadSwitchRaw; IInternetThreadSwitch = IInternetThreadSwitchRaw; PIInternetThreadSwitch = PIInternetThreadSwitchRaw; IInternetPriorityRaw = interface ['{79eac9eb-baf9-11ce-8c82-00aa004ba90b}'] Function SetPriority(nPriority : Longint) : HResult; stdcall; Function GetPriority(nPriority : PLongint) : HResult; stdcall; end; PIInternetPriorityRaw = ^IInternetPriorityRaw; IInternetPriority = interface ['{79eac9eb-baf9-11ce-8c82-00aa004ba90b}'] Function SetPriority(nPriority : Longint) : HResult; stdcall; Function GetPriority(out nPriority : Longint) : HResult; stdcall; end; PIInternetPriority = ^IInternetPriority; IInternetProtocolInfoRaw = interface ['{79eac9ec-baf9-11ce-8c82-00aa004ba90b}'] Function ParseUrl(pwzUrl : LPCWSTR; ParseAction : TParseAction; dwParseFlags : DWORD; pwzResult : LPWSTR; cchResult : DWORD; pcchResult : DWORD; dwReserved : DWORD) : HResult; stdcall; Function CombineUrl(pwzBaseUrl, pwzRelativeUrl : LPCWSTR; dwCombineFlags : DWORD; pwzResult : LPWSTR; cchResult : DWORD; pcchResult : PDWORD; dwReserved : DWORD) : HResult; stdcall; Function CompareUrl(pwzUrl1, pwzUrl2 : LPCWSTR; dwCompareFlags : DWORD) : HResult; stdcall; Function QueryInfo(pwzUrl : LPCWSTR; QueryOption : TQueryOption; dwQueryFlags : DWORD; pBuffer : Pointer; cbBuffer : DWORD; cbBuf : PDWORD; dwReserved : DWORD) : HResult; stdcall; end; PIInternetProtocolInfoRaw = ^IInternetProtocolInfoRaw; IInternetProtocolInfo = interface ['{79eac9ec-baf9-11ce-8c82-00aa004ba90b}'] Function ParseUrl(pwzUrl : LPCWSTR; ParseAction : TParseAction; dwParseFlags : DWORD; pwzResult : LPWSTR; cchResult : DWORD; pcchResult : DWORD; dwReserved : DWORD) : HResult; stdcall; Function CombineUrl(pwzBaseUrl, pwzRelativeUrl : LPCWSTR; dwCombineFlags : DWORD; pwzResult : LPWSTR; cchResult : DWORD; out pcchResult : DWORD; dwReserved : DWORD) : HResult; stdcall; Function CompareUrl(pwzUrl1, pwzUrl2 : LPCWSTR; dwCompareFlags : DWORD) : HResult; stdcall; Function QueryInfo(pwzUrl : LPCWSTR; QueryOption : TQueryOption; dwQueryFlags : DWORD; pBuffer : Pointer; cbBuffer : DWORD; var cbBuf : DWORD; dwReserved : DWORD) : HResult; stdcall; end; PIInternetProtocolInfo = ^IInternetProtocolInfo; IInternetSecurityMgrSiteRaw = interface ['{79eac9ed-baf9-11ce-8c82-00aa004ba90b}'] Function GetWindow(hwnd : PHWnd) : HResult; stdcall; Function EnableModeless(fEnable : BOOL) : HResult; stdcall; end; PIInternetSecurityMgrSiteRaw = ^IInternetSecurityMgrSiteRaw; IInternetSecurityMgrSite = interface ['{79eac9ed-baf9-11ce-8c82-00aa004ba90b}'] Function GetWindow(out hwnd : HWnd) : HResult; stdcall; Function EnableModeless(fEnable : BOOL) : HResult; stdcall; end; PIInternetSecurityMgrSite = ^IInternetSecurityMgrSite; IInternetSecurityManagerRaw = interface ['{79eac9ee-baf9-11ce-8c82-00aa004ba90b}'] Function SetSecuritySite(Site : IInternetSecurityMgrSiteRaw) : HResult; stdcall; Function GetSecuritySite(Site : PIInternetSecurityMgrSiteRaw) : HResult; stdcall; Function MapUrlToZone(pwszUrl : LPCWSTR; dwZone : PDWORD; dwFlags : DWORD) : HResult; stdcall; Function GetSecurityId(pwszUrl : LPCWSTR; pbSecurityId : Pointer; cbSecurityId : PDWORD; dwReserved : DWORD) : HResult; stdcall; Function ProcessUrlAction(pwszUrl : LPCWSTR; dwAction : DWORD; pPolicy : Pointer; cbPolicy : DWORD; pContext : Pointer; cbContext : DWORD; dwFlags, dwReserved : DWORD) : HResult; stdcall; Function QueryCustomPolicy(pwszUrl : LPCWSTR; const guidKey : TGUID; out pPolicy : Pointer; cbPolicy : PDWORD; pContext : Pointer; cbContext : DWORD; dwReserved : DWORD) : HResult; stdcall; Function SetZoneMapping(dwZone : DWORD; lpszPattern : LPCWSTR; dwFlags : DWORD) : HResult; stdcall; Function GetZoneMappings(dwZone : DWORD; enumString : PIEnumString; dwFlags : DWORD) : HResult; stdcall; end; PIInternetSecurityManagerRaw = ^IInternetSecurityManagerRaw; IInternetSecurityManager = interface ['{79eac9ee-baf9-11ce-8c82-00aa004ba90b}'] Function SetSecuritySite(Site : IInternetSecurityMgrSite) : HResult; stdcall; Function GetSecuritySite(out Site : IInternetSecurityMgrSite) : HResult; stdcall; Function MapUrlToZone(pwszUrl : LPCWSTR; out dwZone : DWORD; dwFlags : DWORD) : HResult; stdcall; Function GetSecurityId(pwszUrl : LPCWSTR; pbSecurityId : Pointer; var cbSecurityId : DWORD; dwReserved : DWORD) : HResult; stdcall; Function ProcessUrlAction(pwszUrl : LPCWSTR; dwAction : DWORD; pPolicy : Pointer; cbPolicy : DWORD; pContext : Pointer; cbContext : DWORD; dwFlags, dwReserved : DWORD) : HResult; stdcall; Function QueryCustomPolicy(pwszUrl : LPCWSTR; const guidKey : TGUID; out pPolicy : Pointer; out cbPolicy : DWORD; pContext : Pointer; cbContext : DWORD; dwReserved : DWORD) : HResult; stdcall; Function SetZoneMapping(dwZone : DWORD; lpszPattern : LPCWSTR; dwFlags : DWORD) : HResult; stdcall; Function GetZoneMappings(dwZone : DWORD; out enumString : IEnumString; dwFlags : DWORD) : HResult; stdcall; end; PIInternetSecurityManager = ^IInternetSecurityManager; IInternetHostSecurityManagerRaw = interface ['{3af280b6-cb3f-11d0-891e-00c04fb6bfc4}'] Function GetSecurityId(pbSecurityId : Pointer; cbSecurityId : PDWORD; dwReserved : DWORD) : HResult; stdcall; Function ProcessUrlAction(dwAction : DWORD; pPolicy : Pointer; cbPolicy : DWORD; pContext : Pointer; cbContext, dwFlags, dwReserved : DWORD) : HResult; stdcall; Function QueryCustomPolicy(const guidKey : TGUID; pPolicy : PPointer; cbPolicy : PDWORD; pContext : Pointer; cbContext, dwReserved : DWORD) : HResult; stdcall; end; PIInternetHostSecurityManagerRaw = ^IInternetHostSecurityManagerRaw; IInternetHostSecurityManager = interface ['{3af280b6-cb3f-11d0-891e-00c04fb6bfc4}'] Function GetSecurityId(pbSecurityId : Pointer; var cbSecurityId : DWORD; dwReserved : DWORD) : HResult; stdcall; Function ProcessUrlAction(dwAction : DWORD; pPolicy : Pointer; cbPolicy : DWORD; pContext : Pointer; cbContext, dwFlags, dwReserved : DWORD) : HResult; stdcall; Function QueryCustomPolicy(const guidKey : TGUID; out pPolicy : Pointer; out cbPolicy : DWORD; pContext : Pointer; cbContext, dwReserved : DWORD) : HResult; stdcall; end; PIInternetHostSecurityManager = ^IInternetHostSecurityManager; IInternetZoneManagerRaw = interface ['{79eac9ef-baf9-11ce-8c82-00aa004ba90b}'] Function GetZoneAttributes(dwZone : DWORD; ZoneAttributes : PZoneAttributes) : HResult; stdcall; Function SetZoneAttributes(dwZone : DWORD; const ZoneAttributes : TZoneAttributes) : HResult; stdcall; Function GetZoneCustomPolicy(dwZone : DWORD; const guidKey : TGUID; pPolicy : PPointer; cbPolicy : PDWORD; urlZoneReg : TUrlZoneReg) : HResult; stdcall; Function SetZoneCustomPolicy(dwZone : DWORD; const guidKey : TGUID; pPolicy : Pointer; cbPolicy : DWORD; urlZoneReg : TUrlZoneReg) : HResult; stdcall; Function GetZoneActionPolicy(dwZone, dwAction : DWORD; pPolicy : Pointer; cbPolicy : DWORD; urlZoneReg : TUrlZoneReg) : HResult; stdcall; Function SetZoneActionPolicy(dwZone, dwAction : DWORD; pPolicy : Pointer; cbPolicy : DWORD; urlZoneReg : TUrlZoneReg) : HResult; stdcall; Function PromptAction(dwAction : DWORD; hwndParent : HWnd; pwszUrl, pwszText : LPCWSTR; dwPromptFlags : DWORD) : HResult; stdcall; Function LogAction(dwAction : DWORD; pwszUrl, pwszText : LPCWSTR; dwLogFlags : DWORD) : HResult; stdcall; Function CreateZoneEnumerator(dwEnum, dwCount : PDWORD; dwFlags : DWORD) : HResult; stdcall; Function GetZoneAt(dwEnum, dwIndex : DWORD; dwZone : PDWORD) : HResult; stdcall; Function DestroyZoneEnumerator(dwEnum : DWORD) : HResult; stdcall; Function CopyTemplatePoliciesToZone(dwTemplate, dwZone, dwReserved : DWORD) : HResult; stdcall; end; PIInternetZoneManagerRaw = ^IInternetZoneManagerRaw; IInternetZoneManager = interface ['{79eac9ef-baf9-11ce-8c82-00aa004ba90b}'] Function GetZoneAttributes(dwZone : DWORD; var ZoneAttributes : TZoneAttributes) : HResult; stdcall; Function SetZoneAttributes(dwZone : DWORD; const ZoneAttributes : TZoneAttributes) : HResult; stdcall; Function GetZoneCustomPolicy(dwZone : DWORD; const guidKey : TGUID; out pPolicy : Pointer; out cbPolicy : DWORD; urlZoneReg : TUrlZoneReg) : HResult; stdcall; Function SetZoneCustomPolicy(dwZone : DWORD; const guidKey : TGUID; pPolicy : Pointer; cbPolicy : DWORD; urlZoneReg : TUrlZoneReg) : HResult; stdcall; Function GetZoneActionPolicy(dwZone, dwAction : DWORD; pPolicy : Pointer; cbPolicy : DWORD; urlZoneReg : TUrlZoneReg) : HResult; stdcall; Function SetZoneActionPolicy(dwZone, dwAction : DWORD; pPolicy : Pointer; cbPolicy : DWORD; urlZoneReg : TUrlZoneReg) : HResult; stdcall; Function PromptAction(dwAction : DWORD; hwndParent : HWnd; pwszUrl, pwszText : LPCWSTR; dwPromptFlags : DWORD) : HResult; stdcall; Function LogAction(dwAction : DWORD; pwszUrl, pwszText : LPCWSTR; dwLogFlags : DWORD) : HResult; stdcall; Function CreateZoneEnumerator(out dwEnum, dwCount : DWORD; dwFlags : DWORD) : HResult; stdcall; Function GetZoneAt(dwEnum, dwIndex : DWORD; out dwZone : DWORD) : HResult; stdcall; Function DestroyZoneEnumerator(dwEnum : DWORD) : HResult; stdcall; Function CopyTemplatePoliciesToZone(dwTemplate, dwZone, dwReserved : DWORD) : HResult; stdcall; end; PIInternetZoneManager = ^IInternetZoneManager; ISoftDistExtRaw = interface ['{B15B8DC1-C7E1-11d0-8680-00AA00BDCB71}'] Function ProcessSoftDist(szCDFURL : LPCWSTR; SoftDistElement : Pointer; lpdsi : PSoftDistInfo) : HResult; stdcall; Function GetFirstCodeBase(szCodeBase : PLPWSTR;const dwMaxSize : DWORD) : HResult; stdcall; Function GetNextCodeBase(szCodeBase : PLPWSTR; const dwMaxSize : DWORD) : HResult; stdcall; Function AsyncInstallDistributionUnit(bc : IBindCtx; pvReserved : Pointer; flags : DWORD; const cbh : TCodeBaseHold) : HResult; stdcall; end; PISoftDistExtRaw = ^ISoftDistExtRaw; ISoftDistExt = interface ['{B15B8DC1-C7E1-11d0-8680-00AA00BDCB71}'] Function ProcessSoftDist(szCDFURL : LPCWSTR; SoftDistElement : Pointer; var lpdsi : TSoftDistInfo) : HResult; stdcall; Function GetFirstCodeBase(var szCodeBase : LPWSTR;const dwMaxSize : DWORD) : HResult; stdcall; Function GetNextCodeBase(var szCodeBase : LPWSTR; const dwMaxSize : DWORD) : HResult; stdcall; Function AsyncInstallDistributionUnit(bc : IBindCtx; pvReserved : Pointer; flags : DWORD; const cbh : TCodeBaseHold) : HResult; stdcall; end; PISoftDistExt = ^ISoftDistExt; IDataFilterRaw = interface ['{69d14c80-c18e-11d0-a9ce-006097942311}'] Function DoEncode(dwFlags : DWORD; lInBufferSize : Longint; pbInBuffer : Pointer; lOutBufferSize : Longint; pbOutBuffer : Pointer; lInBytesAvailable : Longint; lInBytesRead, lOutBytesWritten : PLongint; dwReserved : DWORD) : HResult; stdcall; Function DoDecode(dwFlags : DWORD; lInBufferSize : Longint; pbInBuffer : Pointer; lOutBufferSize : Longint; pbOutBuffer : Pointer; lInBytesAvailable : Longint; lInBytesRead, lOutBytesWritten : PLongint; dwReserved : DWORD) : HResult; stdcall; Function SetEncodingLevel(dwEncLevel : DWORD) : HResult; stdcall; end; PIDataFilterRaw = ^IDataFilterRaw; IDataFilter = interface ['{69d14c80-c18e-11d0-a9ce-006097942311}'] Function DoEncode(dwFlags : DWORD; lInBufferSize : Longint; pbInBuffer : Pointer; lOutBufferSize : Longint; pbOutBuffer : Pointer; lInBytesAvailable : Longint; out lInBytesRead, lOutBytesWritten : Longint; dwReserved : DWORD) : HResult; stdcall; Function DoDecode(dwFlags : DWORD; lInBufferSize : Longint; pbInBuffer : Pointer; lOutBufferSize : Longint; pbOutBuffer : Pointer; lInBytesAvailable : Longint; out lInBytesRead, lOutBytesWritten : Longint; dwReserved : DWORD) : HResult; stdcall; Function SetEncodingLevel(dwEncLevel : DWORD) : HResult; stdcall; end; PIDataFilter = ^IDataFilter; IEncodingFilterFactoryRaw = interface ['{70bdde00-c18e-11d0-a9ce-006097942311}'] Function FindBestFilter(pwzCodeIn, pwzCodeOut : LPCWSTR; info : TDataInfo; DF : PIDataFilterRaw) : HResult; stdcall; Function GetDefaultFilter(pwzCodeIn, pwzCodeOut : LPCWSTR; info : TDataInfo; DF : PIDataFilterRaw) : HResult; stdcall; end; PIEncodingFilterFactoryRaw = ^IEncodingFilterFactoryRaw; IEncodingFilterFactory = interface ['{70bdde00-c18e-11d0-a9ce-006097942311}'] Function FindBestFilter(pwzCodeIn, pwzCodeOut : LPCWSTR; info : TDataInfo; out DF : IDataFilter) : HResult; stdcall; Function GetDefaultFilter(pwzCodeIn, pwzCodeOut : LPCWSTR; info : TDataInfo; out DF : IDataFilter) : HResult; stdcall; end; PIEncodingFilterFactory = ^IEncodingFilterFactory; Function CoGetClassObjectFromURL(const rCLASSID : TCLSID; szCODE : LPCWSTR; dwFileVersionMS, dwFileVersionLS : DWORD; szTYPE : LPCWSTR; pBindCtx : IBindCtx; dwClsContext : DWORD; pvReserved : Pointer; const riid : TGUID; ppv : pointer) : HResult; stdcall; external liburlmon; Function CoGetClassObjectFromURL(const rCLASSID : TCLSID; szCODE : LPCWSTR; dwFileVersionMS, dwFileVersionLS : DWORD; szTYPE : LPCWSTR; pBindCtx : IBindCtx; dwClsContext : DWORD; pvReserved : Pointer; const riid : TGUID; out ppv) : HResult; stdcall; external liburlmon; Function CoInternetCombineUrl(pwzBaseUrl, pwzRelativeUrl : LPCWSTR; dwCombineFlags : DWORD; pszResult : LPWSTR; cchResult : DWORD; pcchResult : PDWORD; dwReserved : DWORD) : HResult ; stdcall; external liburlmon; Function CoInternetCombineUrl(pwzBaseUrl, pwzRelativeUrl : LPCWSTR; dwCombineFlags : DWORD; pszResult : LPWSTR; cchResult : DWORD; var pcchResult : DWORD; dwReserved : DWORD) : HResult ; stdcall; external liburlmon; Function CoInternetCompareUrl(pwzUrl1, pwzUrl2 : LPCWSTR; dwFlags : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetGetProtocolFlags(pwzUrl : LPCWSTR; dwFlags : PDWORD; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetGetProtocolFlags(pwzUrl : LPCWSTR; var dwFlags : DWORD; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetCreateSecurityManager(SP : IServiceProvider; SM : PIInternetSecurityManager; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetCreateSecurityManager(SP : IServiceProvider; var SM : IInternetSecurityManager; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetCreateZoneManager(SP : IServiceProvider; ZM : PIInternetZoneManager; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetCreateZoneManager(SP : IServiceProvider; var ZM : IInternetZoneManager; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetGetSecurityUrl(pwzUrl : LPCWSTR; pwzSecUrl : PLPWSTR; psuAction : TPSUAction; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetGetSecurityUrl(pwzUrl : LPCWSTR; var pwzSecUrl : LPWSTR; psuAction : TPSUAction; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetGetSession(dwSessionMode : DWORD; pIInternetSession : PIInternetSession; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetGetSession(dwSessionMode : DWORD; var pIInternetSession : IInternetSession; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetParseUrl(pwzUrl : LPCWSTR; ParseAction : TParseAction; dwFlags : DWORD; pszResult : LPWSTR; cchResult : DWORD; pcchResult : PDWORD; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetParseUrl(pwzUrl : LPCWSTR; ParseAction : TParseAction; dwFlags : DWORD; pszResult : LPWSTR; cchResult : DWORD; var pcchResult : DWORD; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetQueryInfo(pwzUrl : LPCWSTR; QueryOptions : TQueryOption; dwQueryFlags : DWORD; pvBuffer : Pointer; cbBuffer : DWORD; pcbBuffer : PDWORD; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CoInternetQueryInfo(pwzUrl : LPCWSTR; QueryOptions : TQueryOption; dwQueryFlags : DWORD; pvBuffer : Pointer; cbBuffer : DWORD; var pcbBuffer : DWORD; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function CopyBindInfo(const cbiSrc : TBindInfo; biDest : PBindInfo) : HResult; stdcall; external liburlmon; Function CopyBindInfo(const cbiSrc : TBindInfo; var biDest : TBindInfo) : HResult; stdcall; external liburlmon; Function CopyStgMedium(const cstgmedSrc : TStgMedium; stgmedDest : PStgMedium) : HResult; stdcall; external liburlmon; Function CopyStgMedium(const cstgmedSrc : TStgMedium; var stgmedDest : TStgMedium) : HResult; stdcall; external liburlmon; Function CreateAsyncBindCtxEx(pbc : IBindCtx; dwOptions : DWORD; BSCb : IBindStatusCallback; Enum : IEnumFORMATETC; ppBC : PIBindCtx; reserved : DWORD) : HResult; stdcall; external liburlmon; Function CreateAsyncBindCtxEx(pbc : IBindCtx; dwOptions : DWORD; BSCb : IBindStatusCallback; Enum : IEnumFORMATETC; out ppBC : IBindCtx; reserved : DWORD) : HResult; stdcall; external liburlmon; Function CreateAsyncBindCtx(reserved : DWORD; pBSCb : IBindStatusCallback; pEFetc : IEnumFORMATETC; ppBC : PIBindCtx) : HResult; stdcall; external liburlmon; Function CreateAsyncBindCtx(reserved : DWORD; pBSCb : IBindStatusCallback; pEFetc : IEnumFORMATETC; out ppBC : IBindCtx) : HResult; stdcall; external liburlmon; Function CreateFormatEnumerator(cfmtetc : UINT; const rgfmtetc : TFormatEtc; ppenumfmtetc : PIEnumFormatEtc) : HResult; stdcall; external liburlmon; Function CreateFormatEnumerator(cfmtetc : UINT; const rgfmtetc : TFormatEtc; out ppenumfmtetc : IEnumFormatEtc) : HResult; stdcall; external liburlmon; Function CreateURLBinding(lpszUrl : LPCWSTR; pbc : IBindCtx; ppBdg : PIBinding) : HResult; stdcall; external liburlmon; Function CreateURLBinding(lpszUrl : LPCWSTR; pbc : IBindCtx; out ppBdg : IBinding) : HResult; stdcall; external liburlmon; Function CreateURLMoniker(MkCtx : IMoniker; szURL : LPCWSTR; mk : PIMoniker) : HResult; stdcall; external liburlmon; Function CreateURLMoniker(MkCtx : IMoniker; szURL : LPCWSTR; out mk : IMoniker) : HResult; stdcall; external liburlmon; Function FindMediaTypeClass(pBC : IBindCtx; szType : LPCSTR; const pclsID : TCLSID; reserved : DWORD) : HResult; stdcall; external liburlmon; Function FindMediaType(rgszTypes : LPCSTR; rgcfTypes : PClipFormat) : HResult; stdcall; external liburlmon; Function FindMimeFromData(pBC : IBindCtx; pwzUrl : LPCWSTR; pBuffer : Pointer; cbSize : DWORD; pwzMimeProposed : LPCWSTR; dwMimeFlags : DWORD; ppwzMimeOut : PLPWSTR; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function FindMimeFromData(pBC : IBindCtx; pwzUrl : LPCWSTR; pBuffer : Pointer; cbSize : DWORD; pwzMimeProposed : LPCWSTR; dwMimeFlags : DWORD; out ppwzMimeOut : LPWSTR; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function GetClassFileOrMime(pBC : IBindCtx; szFilename : LPCWSTR; pBuffer : Pointer; cbSize : DWORD; szMime : LPCWSTR; dwReserved : DWORD; pclsid : PCLSID) : HResult; stdcall; external liburlmon; Function GetClassFileOrMime(pBC : IBindCtx; szFilename : LPCWSTR; pBuffer : Pointer; cbSize : DWORD; szMime : LPCWSTR; dwReserved : DWORD; out pclsid : TCLSID) : HResult; stdcall; external liburlmon; Function GetClassURL(szURL : LPCWSTR; const ClsID : TCLSID) : HResult; stdcall; external liburlmon; Function GetSoftwareUpdateInfo(szDistUnit : LPCWSTR; var dsi : TSoftDistInfo) : HResult; stdcall; external liburlmon; Function HlinkGoBack(unk : IUnknown) : HResult; stdcall; external liburlmon; Function HlinkGoForward(unk : IUnknown) : HResult; stdcall; external liburlmon; Function HlinkNavigateMoniker(Unk : IUnknown; mkTarget : IMoniker) : HResult; stdcall; external liburlmon; Function HlinkNavigateString(unk : IUnknown; szTarget : LPCWSTR) : HResult; stdcall; external liburlmon; Function HlinkSimpleNavigateToMoniker( mkTarget : Imoniker; szLocation, szTargetFrameName : LPCWSTR; Unk : IUnknown; bc : IBindCtx; BSC : IBindStatusCallback; grfHLNF, dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function HlinkSimpleNavigateToString(szTarget, szLocation, szTargetFrameName : LPCWSTR; Unk : IUnknown; pbc : IBindCtx; BSC : IBindStatusCallback; grfHLNF, dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function IsAsyncMoniker(pmk : IMoniker) : HResult; stdcall; external liburlmon; Function IsLoggingEnabled(pszUrl : PAnsiChar) : BOOL; stdcall; external liburlmon name 'IsLoggingEnabledA'; Function IsLoggingEnabledA(pszUrl : PAnsiChar) : BOOL; stdcall; external liburlmon; Function IsLoggingEnabledW(pszUrl : PWideChar) : BOOL; stdcall; external liburlmon; Function IsValidURL(pBC : IBindCtx; szURL : LPCWSTR; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function MkParseDisplayNameEx(pbc : IBindCtx; szDisplayName : LPCWSTR; pchEaten : PULONG; ppmk : PIMoniker) : HResult; stdcall; external liburlmon; Function MkParseDisplayNameEx(pbc : IBindCtx; szDisplayName : LPCWSTR; out pchEaten : ULONG; out ppmk : IMoniker) : HResult; stdcall; external liburlmon; Function ObtainUserAgentString(dwOption : DWORD; pszUAOut : LPSTR; cbSize : PDWORD) : HResult; stdcall; external liburlmon; Function ObtainUserAgentString(dwOption : DWORD; pszUAOut : LPSTR; var cbSize : DWORD) : HResult; stdcall; external liburlmon; Function RegisterBindStatusCallback(pBC : IBindCtx; pBSCb : IBindStatusCallback; ppBSCBPrev : PIBindStatusCallback; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function RegisterBindStatusCallback(pBC : IBindCtx; pBSCb : IBindStatusCallback; out ppBSCBPrev : IBindStatusCallback; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function RegisterFormatEnumerator(pBC : IBindCtx; pEFetc : IEnumFormatEtc; reserved : DWORD) : HResult; stdcall; external liburlmon; Function RegisterMediaTypeClass(pBC : IBindCtx; ctypes : UINT; const rgszTypes : LPCSTR; rgclsID : PCLSID; reserved : DWORD) : HResult; stdcall; external liburlmon; Function RegisterMediaTypes(ctypes : UINT; const rgszTypes : LPCSTR; const rgcfTypes : TClipFormat) : HResult; stdcall; external liburlmon; Function RevokeBindStatusCallback(pBC : IBindCtx; pBSCb : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function RevokeFormatEnumerator(pBC : IBindCtx; pEFetc : IEnumFormatEtc) : HResult; stdcall; external liburlmon; Function SetSoftwareUpdateAdvertisementState(szDistUnit : LPCWSTR;dwAdState, dwAdvertisedVersionMS, dwAdvertisedVersionLS : DWORD) : HResult; stdcall; external liburlmon; Function URLDownloadToCacheFile(p1 : IUnknown; p2 : PAnsiChar; p3 : PChar; p4 : DWORD; p5 : DWORD; p6 : IBindStatusCallback) : HResult; stdcall; external liburlmon name 'URLDownloadToCacheFileA'; Function URLDownloadToCacheFileA(p1 : IUnknown; p2 : PAnsiChar; p3 : PAnsiChar; p4 : DWORD; p5 : DWORD; p6 : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLDownloadToCacheFileW(p1 : IUnknown; p2 : PWideChar; p3 : PWideChar; p4 : DWORD; p5 : DWORD; p6 : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLDownloadToFile(Caller : IUnknown; URL : PAnsiChar; FileName : PChar; Reserved : DWORD; StatusCB : IBindStatusCallback) : HResult; stdcall; external liburlmon name 'URLDownloadToFileA'; Function URLDownloadToFileA(Caller : IUnknown; URL : PAnsiChar; FileName : PAnsiChar; Reserved : DWORD; StatusCB : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLDownloadToFileW(Caller : IUnknown; URL : PWideChar; FileName : PWideChar; Reserved : DWORD; StatusCB : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function UrlMkGetSessionOption(dwOption : DWORD; pBuffer : Pointer; dwBufferLength : DWORD; pdwBufferLength : PDWORD; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function UrlMkGetSessionOption(dwOption : DWORD; pBuffer : Pointer; dwBufferLength : DWORD; out pdwBufferLength : DWORD; dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function UrlMkSetSessionOption(dwOption : DWORD; pBuffer : Pointer; dwBufferLength, dwReserved : DWORD) : HResult; stdcall; external liburlmon; Function URLOpenBlockingStream(p1 : IUnknown; p2 : PAnsiChar; p3 : PIStream; p4 : DWORD; p5 : IBindStatusCallback) : HResult; stdcall; external liburlmon name 'URLOpenBlockingStreamA'; Function URLOpenBlockingStream(p1 : IUnknown; p2 : PAnsiChar; out p3 : IStream; p4 : DWORD; p5 : IBindStatusCallback) : HResult; stdcall; external liburlmon name 'URLOpenBlockingStreamA'; Function URLOpenBlockingStreamA(p1 : IUnknown; p2 : PAnsiChar; p3 : PIStream; p4 : DWORD; p5 : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLOpenBlockingStreamA(p1 : IUnknown; p2 : PAnsiChar; out p3 : IStream; p4 : DWORD; p5 : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLOpenBlockingStreamW(p1 : IUnknown; p2 : PWideChar; p3 : PIStream; p4 : DWORD; p5 : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLOpenBlockingStreamW(p1 : IUnknown; p2 : PWideChar; out p3 : IStream; p4 : DWORD; p5 : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLOpenPullStream(p1 : IUnknown; p2 : PAnsiChar; p3 : DWORD; BSC : IBindStatusCallback) : HResult; stdcall; external liburlmon name 'URLOpenPullStreamA'; Function URLOpenPullStreamA(p1 : IUnknown; p2 : PAnsiChar; p3 : DWORD; BSC : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLOpenPullStreamW(p1 : IUnknown; p2 : PWideChar; p3 : DWORD; BSC : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLOpenStream(p1 : IUnknown; p2 : PAnsiChar; p3 : DWORD; p4 : IBindStatusCallback) : HResult; stdcall; external liburlmon name 'URLOpenStreamA'; Function URLOpenStreamA(p1 : IUnknown; p2 : PAnsiChar; p3 : DWORD; p4 : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function URLOpenStreamW(p1 : IUnknown; p2 : PWideChar; p3 : DWORD; p4 : IBindStatusCallback) : HResult; stdcall; external liburlmon; Function WriteHitLogging(const Logginginfo : THIT_LOGGING_INFO) : BOOL; stdcall; external liburlmon; Procedure ReleaseBindInfo(const bindinfo : TBindInfo); stdcall; external liburlmon; external liburlmon; implementation end.