-
добрый день господа
есть такая програмка АОЛ инстант месенджер, версии 6. из нее я импортировал библиотеку типов acccore.dll, получил таким образом юнит AccCoreLib_TLB.pas. теперь суть проблемы: надо как-то использовать интерфейсы описанные в нем, для манипуляций с клиентским приложением AIM6. когда я делал тоже самое с IE используя shdocvw.pas у меня все получилось, а с этим аолом не получается почемуто. доки читал и здесь и в гугле, чето не особо помогают:-( нужно небольшой примерчик с коментами, дальше сам разберусь (надеюсь). полный код AccCoreLib_TLB.pas ниже. спасибо что прочитали до конца.
-
unit AccCoreLib_TLB;
interface
uses ActiveX, Classes, Graphics, OleServer, StdVCL, Variants, Windows;
const
AccCoreLibMajorVersion = 1;
AccCoreLibMinorVersion = 0;
LIBID_AccCoreLib: TGUID = '';
IID_IAccAvManager: TGUID = '';
IID_IAccSecondarySession: TGUID = '';
IID_IAccAvSession: TGUID = '';
IID_IAccBartItem: TGUID = '';
IID_IAccCertificate: TGUID = '';
IID_IAccCommandTarget: TGUID = '';
IID_IAccDirEntry: TGUID = '';
IID_IAccEmoticon: TGUID = '';
IID_IAccEmoticonSet: TGUID = '';
IID_IAccFileSharingManager: TGUID = '';
IID_IAccFileSharingSession: TGUID = '';
IID_IAccFileSharingItem: TGUID = '';
IID_IAccFileXferManager: TGUID = '';
IID_IAccFileXferSession: TGUID = '';
IID_IAccLocation: TGUID = '';
IID_IAccPlugin: TGUID = '';
IID_IAccSession: TGUID = '';
IID_IAccClientInfo: TGUID = '';
IID_IAccPreferencesHook: TGUID = '';
IID_IAccBuddyList: TGUID = '';
IID_IAccGroup: TGUID = '';
IID_IAccUser: TGUID = '';
IID_IAccSecurityManager: TGUID = '';
IID_IAccPluginManager: TGUID = '';
IID_IAccPluginInfo: TGUID = '';
IID_IAccCommand: TGUID = '';
IID_IAccPreferences: TGUID = '';
IID_IAccImSession: TGUID = '';
IID_IAccIm: TGUID = '';
IID_IAccStream: TGUID = '';
IID_IAccCustomSession: TGUID = '';
IID_IAccShareBuddiesManager: TGUID = '';
IID_IAccShareBuddiesSession: TGUID = '';
IID_IAccServiceTicket: TGUID = '';
IID_IAccStoredImManager: TGUID = '';
IID_IAccStreamListener: TGUID = '';
IID_IAccUpgradeInfo: TGUID = '';
DIID_DAccEvents: TGUID = '';
IID_IAccInstance: TGUID = '';
IID_IAccAlert: TGUID = '';
IID_IAccParticipant: TGUID = '';
IID_IAccFileXfer: TGUID = '';
IID_IAccPluginAdapter: TGUID = '';
CLASS_AccSession: TGUID = '';
type
AccAlertProp = TOleEnum;
const
AccAlertProp_Uuid = $00000000;
AccAlertProp_Cookie = $00000001;
AccAlertProp_Timestamp = $00000002;
AccAlertProp_GotMail = $000003E8;
AccAlertProp_NumMails = $000003E9;
AccAlertProp_NumVoicemails = $000003EA;
AccAlertProp_Address = $000003EB;
AccAlertProp_ReadUrl = $000003EC;
AccAlertProp_GotPics = $0000044C;
AccAlertProp_Description = $000004B0;
AccAlertProp_Content = $000004B1;
AccAlertProp_ImageUrl = $000004B2;
AccAlertProp_MoreInfoUrl = $000004B3;
AccAlertProp_Duplicate = $000004B4;
AccAlertProp_DisplayTime = $000004B5;
AccAlertProp_Duration = $000004B6;
AccAlertProp_NotifyPrefs = $000004B7;
type
AccAlertType = TOleEnum;
const
AccAlertType_Mail = $00000000;
AccAlertType_Ygp = $00000001;
AccAlertType_Rendered = $00000002;
-
type
AccAvFlags = TOleEnum;
const
AccAvFlags_ForceNonSecure = $00000002;
AccAvFlags_ForceSecure = $00000003;
AccAvFlags_Video = $00000004;
type
AccAvLocalVideoMode = TOleEnum;
const
AccAvLocalVideoMode_Hidden = $00000000;
AccAvLocalVideoMode_PictureInPicture = $00000001;
type
AccAvManagerProp = TOleEnum;
const
AccAvManagerProp_InputMuted = $00000000;
AccAvManagerProp_InputVolume = $00000001;
AccAvManagerProp_OutputVolume = $00000002;
AccAvManagerProp_InputDevice = $00000003;
AccAvManagerProp_OutputDevice = $00000004;
AccAvManagerProp_AvailableInputDevices = $00000005;
AccAvManagerProp_AvailableOutputDevices = $00000006;
AccAvManagerProp_TemporalSpatialTradeOff = $00000007;
AccAvManagerProp_MaxBitrate = $00000008;
AccAvManagerProp_EchoCancellation = $00000009;
AccAvManagerProp_LibraryName = $0000000A;
AccAvManagerProp_LibraryVersion = $0000000B;
AccAvManagerProp_VideoInputDevice = $0000000C;
AccAvManagerProp_AvailableVideoInputDevices = $0000000D;
AccAvManagerProp_WindowsVoiceInputDevice = $0000000E;
AccAvManagerProp_WindowsVoiceOutputDevice = $0000000F;
AccAvManagerProp_WindowsAudioInputDevice = $00000010;
AccAvManagerProp_WindowsAudioOutputDevice = $00000011;
type
AccAvSessionProp = TOleEnum;
const
AccAvSessionProp_Video = $000003E8;
AccAvSessionProp_NetworkQuality = $000003E9;
AccAvSessionProp_SessionType = $000003EA;
AccAvSessionProp_SessionTypeProposed = $000003EB;
AccAvSessionProp_PromoteCentralized = $000003EC;
AccAvSessionProp_LocalVideoMode = $000003ED;
type
AccAvSessionType = TOleEnum;
const
AccAvSessionType_Talk = $00000000;
AccAvSessionType_Rtp = $00000001;
AccAvSessionType_RtpConference = $00000002;
type
AccAvStreamType = TOleEnum;
const
AccAvStreamType_AudioSend = $00000000;
AccAvStreamType_AudioReceive = $00000001;
AccAvStreamType_VideoSend = $00000002;
AccAvStreamType_VideoReceive = $00000003;
type
AccBartItemProp = TOleEnum;
const
AccBartItemProp_BartItemType = $00000000;
AccBartItemProp_Official = $00000001;
AccBartItemProp_Id = $00000002;
AccBartItemProp_IdHex = $00000003;
AccBartItemProp_MimeType = $00000004;
AccBartItemProp_Data = $00000005;
AccBartItemProp_DataObject = $00000006;
AccBartItemProp_DataStream = $00000007;
AccBartItemProp_BartUrl = $00000008;
AccBartItemProp_Name = $00000009;
type
AccBartItemType = TOleEnum;
const
AccBartItemType_SmallIcon = $00000000;
AccBartItemType_BuddyIcon = $00000001;
AccBartItemType_StatusText = $00000002;
AccBartItemType_ArriveSound = $00000003;
AccBartItemType_RichName = $00000004;
AccBartItemType_SuperIcon = $00000005;
AccBartItemType_RadioStation = $00000006;
AccBartItemType_SuperIconTrigger = $00000007;
AccBartItemType_StatusTextLink = $00000009;
AccBartItemType_Location = $0000000B;
AccBartItemType_BigIcon = $0000000C;
AccBartItemType_StatusTextTimestamp = $0000000D;
AccBartItemType_CurrentAvTrack = $0000000F;
AccBartItemType_DepartSound = $00000060;
AccBartItemType_Wallpaper = $00000081;
AccBartItemType_ImSound = $00000083;
AccBartItemType_Badge = $00000084;
AccBartItemType_ImInitialSound = $00000086;
AccBartItemType_FlashWallpaper = $00000088;
AccBartItemType_ImmersiveWallpaper = $00000089;
AccBartItemType_EmoticonSet = $00000400;
type
AccBuddyListProp = TOleEnum;
const
AccBuddyListProp_Session = $FFFFFFFF;
AccBuddyListProp_MaxGroupCount = $00000000;
AccBuddyListProp_MaxBuddyCount = $00000001;
AccBuddyListProp_MaxGroupNameLength = $00000002;
AccBuddyListProp_MaxBuddyNameLength = $00000003;
AccBuddyListProp_MaxBuddyCountPerGroup = $00000004;
AccBuddyListProp_Ready = $00000005;
type
AccCallAlertProp = TOleEnum;
const
AccCallAlertProp_Identifier = $00000000;
AccCallAlertProp_Timestamp = $00000001;
AccCallAlertProp_PackageUrl = $00000002;
AccCallAlertProp_PackageRoot = $00000003;
AccCallAlertProp_PackageMD5 = $00000004;
AccCallAlertProp_Height = $00000005;
AccCallAlertProp_Width = $00000006;
AccCallAlertProp_NotificationType = $00000007;
AccCallAlertProp_FormattedOriginator = $00000008;
AccCallAlertProp_CorrelatedSource = $00000009;
AccCallAlertProp_Blob = $0000000A;
AccCallAlertProp_BlobStream = $0000000B;
type
AccCertificateProp = TOleEnum;
const
AccCertificateProp_Name = $00000000;
AccCertificateProp_SerialNumber = $00000001;
AccCertificateProp_IssueTime = $00000002;
AccCertificateProp_ExpireTime = $00000003;
AccCertificateProp_Usage = $00000004;
AccCertificateProp_SubjectCommonName = $0000000A;
AccCertificateProp_SubjectOrg = $0000000B;
AccCertificateProp_SubjectOrgUnit = $0000000C;
AccCertificateProp_SubjectDomainComponent = $0000000D;
AccCertificateProp_SubjectEmailAddress = $0000000E;
AccCertificateProp_IssuerCommonName = $00000014;
AccCertificateProp_IssuerOrg = $00000015;
AccCertificateProp_IssuerOrgUnit = $00000016;
AccCertificateProp_IssuerDomainComponent = $00000017;
AccCertificateProp_Trusted = $0000001E;
-
type
AccCertificateTrustFlags = TOleEnum;
const
AccCertificateTrustFlags_Ssl = $00000001;
AccCertificateTrustFlags_Email = $00000002;
AccCertificateTrustFlags_ObjectSigning = $00000004;
type
AccCertificateUsage = TOleEnum;
const
AccCertificateUsage_SslClient = $00000001;
AccCertificateUsage_SslServer = $00000002;
AccCertificateUsage_Signing = $00000010;
AccCertificateUsage_Encryption = $00000020;
type
AccCommandFlags = TOleEnum;
const
AccCommandFlags_BuddyCentric = $00000001;
AccCommandFlags_ActionsUi = $00000002;
AccCommandFlags_BuddyUi = $00000004;
AccCommandFlags_GroupUi = $00000008;
AccCommandFlags_ImSessionUi = $00000010;
AccCommandFlags_PreferencesUi = $00000020;
AccCommandFlags_AboutUi = $00000040;
AccCommandFlags_PresenceUi = $00000080;
type
AccCommandId = TOleEnum;
const
AccCommandId_Preferences = $FFFFFFFF;
AccCommandId_Default = $00000000;
type
AccCustomSessionMode = TOleEnum;
const
AccCustomSessionMode_OfferAnswer = $00000000;
AccCustomSessionMode_Streams = $00000001;
AccCustomSessionMode_Message = $00000002;
type
AccCustomSessionProp = TOleEnum;
const
AccCustomSessionProp_Uuid = $000003E8;
AccCustomSessionProp_Mode = $000003E9;
AccCustomSessionProp_InvitationData = $000003EA;
type
AccDirEntryProp = TOleEnum;
const
AccDirEntryProp_UserName = $00000009;
AccDirEntryProp_FirstName = $00000001;
AccDirEntryProp_LastName = $00000002;
AccDirEntryProp_MiddleName = $00000003;
AccDirEntryProp_MaidenName = $00000004;
AccDirEntryProp_NickName = $0000000C;
AccDirEntryProp_StreetAddress = $00000021;
AccDirEntryProp_City = $00000008;
AccDirEntryProp_State = $00000007;
AccDirEntryProp_ZipCode = $0000000D;
AccDirEntryProp_Country = $00000006;
type
AccEmoticonProp = TOleEnum;
const
AccEmoticonProp_Data = $00000000;
AccEmoticonProp_Text = $00000001;
AccEmoticonProp_Description = $00000002;
AccEmoticonProp_DataStream = $00000003;
AccEmoticonProp_BartUrl = $00000004;
type
AccEmoticonSetProp = TOleEnum;
const
AccEmoticonSetProp_BartId = $00000000;
AccEmoticonSetProp_Description = $00000001;
AccEmoticonSetProp_PaletteIconData = $00000002;
AccEmoticonSetProp_PaletteIconDataStream = $00000003;
type
AccFileSharingItemProp = TOleEnum;
const
AccFileSharingItemProp_IsDirectory = $00000000;
AccFileSharingItemProp_ListingCount = $00000001;
AccFileSharingItemProp_LocalPath = $00000002;
AccFileSharingItemProp_ParentItem = $00000003;
AccFileSharingItemProp_RemoteName = $00000004;
AccFileSharingItemProp_RemotePath = $00000005;
AccFileSharingItemProp_FileBytes = $00000006;
AccFileSharingItemProp_FileMacCreator = $00000007;
AccFileSharingItemProp_FileMacFlags = $00000008;
AccFileSharingItemProp_FileMacType = $00000009;
AccFileSharingItemProp_FileTimeCreated = $0000000A;
AccFileSharingItemProp_FileTimeModified = $0000000B;
AccFileSharingItemProp_FileSharingSession = $0000000C;
type
AccFileSharingSessionProp = TOleEnum;
const
AccFileSharingSessionProp_CanStop = $000003E8;
AccFileSharingSessionProp_FileXferSession = $000003E9;
AccFileSharingSessionProp_TopLevelListingCount = $000003EA;
AccFileSharingSessionProp_XferringFileSharingItem = $000003EB;
AccFileSharingSessionProp_AccessControlHook = $000003EC;
type
AccFileXferFlags = TOleEnum;
const
AccFileXferFlags_ForceNonSecure = $00000002;
AccFileXferFlags_ForceSecure = $00000003;
type
AccFileXferProp = TOleEnum;
const
AccFileXferProp_Bytes = $00000000;
AccFileXferProp_BytesXferred = $00000001;
AccFileXferProp_LocalPath = $00000002;
AccFileXferProp_Name = $00000003;
type
AccFileXferSessionCollisionAction = TOleEnum;
const
AccFileXferSessionCollisionAction_SaveAs = $00000000;
AccFileXferSessionCollisionAction_Skip = $00000001;
AccFileXferSessionCollisionAction_Replace = $00000002;
AccFileXferSessionCollisionAction_SkipAll = $00000003;
AccFileXferSessionCollisionAction_ReplaceAll = $00000004;
type
AccFileXferSessionProp = TOleEnum;
const
AccFileXferSessionProp_CurrentFileXfer = $000003E8;
AccFileXferSessionProp_DownloadDirPath = $000003E9;
AccFileXferSessionProp_FileSharingSession = $000003EA;
AccFileXferSessionProp_IsDirectory = $000003EB;
AccFileXferSessionProp_Name = $000003EC;
AccFileXferSessionProp_Send = $000003ED;
AccFileXferSessionProp_Speed = $000003EE;
AccFileXferSessionProp_TotalBytes = $000003EF;
AccFileXferSessionProp_TotalBytesXferred = $000003F0;
AccFileXferSessionProp_TotalNumFiles = $000003F1;
AccFileXferSessionProp_TotalNumFilesRemaining = $000003F2;
type
AccGroupProp = TOleEnum;
const
AccGroupProp_Session = $FFFFFFFF;
AccGroupProp_Name = $00000000;
AccGroupProp_OnlineCount = $00000001;
AccGroupProp_Collapsed = $00000002;
AccGroupProp_Shared = $00000003;
AccGroupProp_RecentBuddies = $00000004;
AccGroupProp_Smart = $00000005;
AccGroupProp_ReadOnly = $00000006;
AccGroupProp_SynchronizedStorageType = $00000007;
AccGroupProp_SynchronizedStorageName = $00000008;
AccGroupProp_Offline = $00000009;
type
AccImContentFlags = TOleEnum;
const
AccImContentFlags_Image = $00000001;
AccImContentFlags_Video = $00000002;
AccImContentFlags_All = $00000003;
type
AccImExchange = TOleEnum;
const
AccImExchange_PrivateAutomatic = $00000000;
AccImExchange_PrivateSecure = $00000002;
AccImExchange_PrivateNonSecure = $00000004;
type
AccImFlags = TOleEnum;
const
AccImFlags_AutoResponse = $00000001;
AccImFlags_Store = $00000002;
AccImFlags_Rtim = $00000004;
type
AccImInputState = TOleEnum;
const
AccImInputState_None = $00000000;
AccImInputState_NotEmpty = $00000001;
AccImInputState_Typing = $00000002;
AccImInputState_Recording = $00000003;
-
type
AccImProp = TOleEnum;
const
AccImProp_MimeType = $00000000;
AccImProp_Flags = $00000001;
AccImProp_Timestamp = $00000002;
AccImProp_Verified = $00000003;
AccImProp_Segments = $00000004;
AccImProp_SegmentCharsRemaining = $00000005;
AccImProp_Cookie = $00000006;
AccImProp_ContainsImages = $00000007;
AccImProp_AllowImages = $00000008;
AccImProp_Subject = $00000009;
AccImProp_StreamCount = $0000000A;
AccImProp_Disposition = $0000000B;
AccImProp_SerializedText = $0000000C;
AccImProp_Local = $0000000D;
AccImProp_AllowedContentFlags = $0000000E;
AccImProp_ActualContentFlags = $0000000F;
AccImProp_BartBase = $00002710;
AccImProp_BuddyIcon = $00002711;
AccImProp_SuperIcon = $00002715;
AccImProp_SuperIconTrigger = $00002717;
AccImProp_BigIcon = $0000271C;
AccImProp_Wallpaper = $00002791;
AccImProp_Sound = $00002793;
AccImProp_FlashWallpaper = $00002798;
type
AccImSessionProp = TOleEnum;
const
AccImSessionProp_SessionType = $000003E8;
AccImSessionProp_SessionTypeProposed = $000003E9;
AccImSessionProp_ChatExchange = $000003EA;
AccImSessionProp_ChatRoomName = $000003EB;
AccImSessionProp_ChatRoomFullyQualifiedName = $000003EC;
AccImSessionProp_ChatInstance = $000003ED;
AccImSessionProp_CanStop = $000003EE;
AccImSessionProp_OutgoingPersonality = $000003EF;
AccImSessionProp_MaxImLength = $000003F0;
AccImSessionProp_MaxVisibleImLength = $000003F1;
AccImSessionProp_RateState = $000003F2;
AccImSessionProp_PromoteCentralized = $000003F3;
AccImSessionProp_LocalWantsRtim = $000003F4;
AccImSessionProp_RemoteWantsRtim = $000003F5;
type
AccImSessionType = TOleEnum;
const
AccImSessionType_Im = $00000000;
AccImSessionType_DirectIm = $00000001;
AccImSessionType_Chat = $00000002;
type
AccInstanceProp = TOleEnum;
const
AccInstanceProp_Id = $00000000;
AccInstanceProp_State = $00000001;
AccInstanceProp_OnlineTime = $00000002;
AccInstanceProp_IpAddress = $00000003;
AccInstanceProp_Port = $00000004;
AccInstanceProp_Flags = $00000005;
type
AccParentalControlFlags = TOleEnum;
const
AccParentalControlFlags_NoIm = $00000001;
AccParentalControlFlags_NoChat = $00000002;
AccParentalControlFlags_NoBuddyList = $00000004;
AccParentalControlFlags_NoAudio = $00000008;
AccParentalControlFlags_NoVideo = $00000010;
AccParentalControlFlags_NoDirectIm = $00000020;
AccParentalControlFlags_NoCustomSound = $00000040;
AccParentalControlFlags_NoCustomIcon = $00000080;
AccParentalControlFlags_NoFileXfer = $00000200;
AccParentalControlFlags_ForceRelay = $00000400;
AccParentalControlFlags_NoChatLinks = $00000800;
AccParentalControlFlags_NoBuddyFeed = $00001000;
type
AccParticipantProp = TOleEnum;
const
AccParticipantProp_State = $00000000;
AccParticipantProp_Owner = $00000001;
type
AccParticipantState = TOleEnum;
const
AccParticipantState_Offline = $00000000;
AccParticipantState_Online = $000001F4;
AccParticipantState_Paused = $00000258;
-
type
AccPermissions = TOleEnum;
const
AccPermissions_Ask = $00000000;
AccPermissions_RejectAll = $00000001;
AccPermissions_AcceptAll = $00000002;
type
AccPluginInfoProp = TOleEnum;
const
AccPluginInfoProp_Uuid = $00000000;
AccPluginInfoProp_Name = $00000001;
AccPluginInfoProp_Version = $00000002;
AccPluginInfoProp_Description = $00000003;
AccPluginInfoProp_Url = $00000004;
AccPluginInfoProp_VendorName = $00000005;
AccPluginInfoProp_VendorUrl = $00000006;
AccPluginInfoProp_IconUrl = $00000007;
AccPluginInfoProp_SmallIconUrl = $00000008;
AccPluginInfoProp_Enabled = $00000064;
AccPluginInfoProp_VerificationResult = $00000065;
AccPluginInfoProp_TrustFlags = $00000066;
AccPluginInfoProp_Started = $00000067;
AccPluginInfoProp_Plugin = $00000068;
AccPluginInfoProp_Commands = $000000C8;
AccPluginInfoProp_Windows = $0000012C;
type
AccPrivacyMode = TOleEnum;
const
AccPrivacyMode_DenyNone = $00000001;
AccPrivacyMode_PermitNone = $00000002;
AccPrivacyMode_Permit = $00000003;
AccPrivacyMode_Deny = $00000004;
AccPrivacyMode_PermitBuddies = $00000005;
type
AccProxyProtocol = TOleEnum;
const
AccProxyProtocol_None = $00000000;
AccProxyProtocol_Socks4 = $00000001;
AccProxyProtocol_Socks5 = $00000002;
AccProxyProtocol_Http = $00000003;
AccProxyProtocol_Https = $00000004;
type
AccRateState = TOleEnum;
const
AccRateState_Unknown = $00000000;
AccRateState_Limit = $00000001;
AccRateState_Alert = $00000002;
AccRateState_Clear = $00000003;
type
AccRegistrationStatus = TOleEnum;
const
AccRegistrationStatus_NoDisclosure = $00000001;
AccRegistrationStatus_LimitedDisclosure = $00000002;
AccRegistrationStatus_FullDisclosure = $00000003;
type
AccResult = TOleEnum;
const
ACC_E = $80040000;
ACC_S = $00040000;
ACC_E_TOO_MANY_ITEMS = $80040200;
ACC_E_TOO_MUCH_DATA = $80040201;
ACC_E_ALREADY_EXISTS = $80040202;
ACC_E_NO_DATA = $80040203;
ACC_E_INVALID_DATA = $80040204;
ACC_E_BANNED_DATA = $80040205;
ACC_E_TOO_MANY_MATCHES = $80040206;
ACC_E_MUST_REQUEST_DATA = $80040207;
ACC_E_RATE_LIMITED = $80040210;
ACC_E_NOT_LOGGED_ON = $80040211;
ACC_E_INVALID_CLIENT_INFO = $80040212;
ACC_E_INVALID_IDENTITY = $80040213;
ACC_E_SERVER_ERROR = $80040214;
ACC_E_TIMEOUT = $80040215;
ACC_E_FEATURE_DISABLED = $80040216;
ACC_E_FEATURE_UNAVAILABLE = $80040217;
ACC_E_INSUFFICIENT_RIGHTS = $80040218;
ACC_E_FILE_NOT_FOUND = $80040220;
ACC_E_WRITE_FAILED = $80040221;
ACC_E_INVALID_PASSWORD = $80040222;
ACC_E_READ_FAILED = $80040223;
ACC_E_INVALID_CHECKSUM = $80040224;
ACC_E_FILE_CORRUPT = $80040224;
ACC_E_REQUEST_DENIED = $80040225;
ACC_E_NO_ADDRESS = $80040226;
ACC_E_UNSUPPORTED_CONVERSION = $80040227;
ACC_E_READ_ONLY = $80040228;
ACC_E_STORAGE_FULL = $80040229;
ACC_E_PEER_UNREACHABLE = $80040325;
ACC_E_INVALID_SERVER_NAME = $80040230;
ACC_E_CONNECT_ERROR = $80040231;
ACC_E_INVALID_PROXY_NAME = $80040232;
ACC_E_PROXY_CONNECT_ERROR = $80040233;
ACC_E_PROXY_AUTH_ERROR = $80040234;
ACC_E_INVALID_TUNNEL_NAME = $80040235;
ACC_E_TUNNEL_CONNECT_ERROR = $80040236;
ACC_E_BUMPED = $80040237;
ACC_E_SSL_HANDSHAKE_ERROR = $80040238;
ACC_E_DISCONNECTED = $8004023F;
ACC_E_SUSPENDED_IDENTITY = $80040240;
ACC_E_MANDATORY_UPGRADE = $80040241;
ACC_E_INVALID_SECURID = $80040242;
ACC_E_NEED_CREDIT_CARD_VALIDATION = $80040243;
ACC_E_INVALID_LINK = $80040244;
ACC_E_BROKEN_LINK = $80040245;
ACC_E_NOT_FROM_FREE_AREA = $80040250;
ACC_E_PARENTAL_CONTROLS = $80040251;
ACC_E_SESSION_FULL = $80040252;
ACC_E_PAYMENT_REQUIRED = $80040253;
ACC_E_INVALID_SESSION_NAME = $80040254;
ACC_E_CANNOT_INITIATE_SESSION = $80040255;
ACC_E_USER_BLOCKED = $80040260;
ACC_E_USER_NOT_CAPABLE = $80040261;
ACC_E_USER_NOT_LOGGED_ON = $80040262;
ACC_E_USER_PARENTAL_CONTROLS = $80040263;
ACC_E_USER_INNOCENT = $80040264;
ACC_E_USER_IS_BUDDY = $80040265;
ACC_E_USER_IS_BOT = $80040266;
ACC_E_USER_DID_NOT_INITIATE = $80040267;
ACC_E_USER_REJECTED = $80040270;
ACC_E_USER_UNAVAILABLE = $80040271;
ACC_E_VERSION_MISMATCH = $80040272;
ACC_E_SECURITY_MISMATCH = $80040273;
ACC_E_USER_BUSY = $80040274;
ACC_E_USER_CANCELLED = $80040278;
ACC_E_USER_ABANDONED = $80040279;
ACC_E_ACCEPTED_ELSEWHERE = $8004027A;
ACC_E_SESSION_CLOSED = $80040280;
ACC_E_SESSION_EXPIRED = $80040281;
ACC_E_SESSION_SHUTDOWN = $80040282;
ACC_E_EJECTED = $80040283;
ACC_E_INVALID_SIGNATURE = $80040300;
ACC_E_EXPIRED_CERT = $80040310;
ACC_E_UNKNOWN_CERT_ISSUER = $80040311;
ACC_E_UNTRUSTED_CERT_ISSUER = $80040312;
ACC_E_INVALID_CERT_USAGE = $80040313;
ACC_E_REVOKED_CERT = $80040314;
ACC_E_NO_DEVICE = $80040323;
ACC_E_BUSY_DEVICE = $80040324;
ACC_E_PLUGIN_ABORTED_ACTION = $80040400;
ACC_E_PLUGIN_CONSUMED_ACTION = $80040401;
ACC_E_INVALID_KEY = $80040410;
ACC_E_RATE_LIMITED_KEY = $80040411;
ACC_E_EXPIRED_KEY = $80040412;
ACC_E_SUSPENDED_KEY = $80040413;
ACC_E_INVALID_FINGERPRINT = $80040414;
ACC_S_NO_CHANGE = $00040201;
-
type
AccSecondarySessionProp = TOleEnum;
const
AccSecondarySessionProp_Session = $FFFFFFFF;
AccSecondarySessionProp_ServiceId = $00000000;
AccSecondarySessionProp_State = $00000001;
AccSecondarySessionProp_SessionState = $00000001;
AccSecondarySessionProp_Invitation = $00000002;
AccSecondarySessionProp_Secure = $00000003;
AccSecondarySessionProp_RemoteUserName = $00000004;
AccSecondarySessionProp_Participants = $00000005;
AccSecondarySessionProp_MaxParticipantCount = $00000006;
AccSecondarySessionProp_Invitees = $00000007;
AccSecondarySessionProp_Name = $00000008;
AccSecondarySessionProp_CreationTime = $00000009;
AccSecondarySessionProp_OnlineTime = $0000000A;
AccSecondarySessionProp_RemainingTime = $0000000B;
AccSecondarySessionProp_Id = $0000000C;
AccSecondarySessionProp_LinkedSessions = $0000000D;
AccSecondarySessionProp_Max = $000003E7;
type
AccSecondarySessionServiceId = TOleEnum;
const
AccSecondarySessionServiceId_Im = $00000001;
AccSecondarySessionServiceId_AudioVideo = $00000002;
AccSecondarySessionServiceId_FileXfer = $00000003;
AccSecondarySessionServiceId_FileSharing = $00000004;
AccSecondarySessionServiceId_ShareBuddies = $00000005;
AccSecondarySessionServiceId_Custom = $00000006;
type
AccSecondarySessionState = TOleEnum;
const
AccSecondarySessionState_Offline = $00000000;
AccSecondarySessionState_ReceivedProposal = $00000032;
AccSecondarySessionState_SentProposal = $0000004B;
AccSecondarySessionState_Connecting = $00000064;
AccSecondarySessionState_Online = $000001F4;
AccSecondarySessionState_Paused = $00000258;
type
AccSecurityManagerProp = TOleEnum;
const
AccSecurityManagerProp_PasswordInited = $00000000;
type
AccServiceTicketProp = TOleEnum;
const
AccServiceTicketProp_Identity = $00000000;
AccServiceTicketProp_Service = $00000001;
AccServiceTicketProp_ServerRealm = $00000002;
AccServiceTicketProp_Version = $00000003;
AccServiceTicketProp_UrlEncodedString = $00000004;
AccServiceTicketProp_Ticket = $00000064;
AccServiceTicketProp_TicketStream = $00000065;
AccServiceTicketProp_TicketBase64 = $00000066;
AccServiceTicketProp_Authenticator = $000000C8;
AccServiceTicketProp_AuthenticatorStream = $000000C9;
AccServiceTicketProp_AuthenticatorBase64 = $000000CA;
type
AccServiceTicketVersion = TOleEnum;
const
AccServiceTicketVersion_KRB_V5 = $00000005;
AccServiceTicketVersion_REF_V1 = $FFFFFC17;
type
AccSessionProp = TOleEnum;
const
AccSessionProp_Identity = $00000000;
AccSessionProp_LinkedIdentities = $00000001;
AccSessionProp_InstanceId = $00000002;
AccSessionProp_OnlineTime = $00000003;
AccSessionProp_IpAddress = $00000004;
AccSessionProp_Port = $00000005;
AccSessionProp_Profile = $00000006;
AccSessionProp_AwayMessage = $00000007;
AccSessionProp_Capabilities = $00000008;
AccSessionProp_AppearOffline = $00000009;
AccSessionProp_ImForwardingCapable = $0000000A;
AccSessionProp_ImForwardingActive = $0000000B;
AccSessionProp_SecondsOfInactivityBeforeIdleState = $0000000C;
AccSessionProp_SecondsSinceUserActivity = $0000000D;
AccSessionProp_SecondsSinceKeyboardActivity = $0000000E;
AccSessionProp_SecondsRemainingUntilIdleState = $0000000F;
AccSessionProp_UserIdle = $00000010;
AccSessionProp_BetaUpgradeInfo = $00000011;
AccSessionProp_UpgradeInfo = $00000012;
AccSessionProp_UpgradeRecommended = $00000013;
AccSessionProp_HostTime = $00000014;
AccSessionProp_ChangePasswordUrl = $00000015;
AccSessionProp_UiFlags = $00000016;
AccSessionProp_InstanceFlags = $00000017;
AccSessionProp_ParentalControls = $00000018;
AccSessionProp_Subscriptions = $00000019;
AccSessionProp_MaxProfileLength = $0000001A;
AccSessionProp_MaxAwayMessageLength = $0000001B;
AccSessionProp_MaxChatRoomNameLength = $0000001C;
AccSessionProp_MaxInvitationLength = $0000001D;
AccSessionProp_MaxLookupUserCount = $0000001E;
AccSessionProp_MaxUserLookups = $0000001E;
AccSessionProp_LinkedMasterSession = $0000001F;
AccSessionProp_MaxChatSessionCount = $00000020;
AccSessionProp_MaxChatSessions = $00000020;
AccSessionProp_MaxPermittedUserCount = $00000021;
AccSessionProp_MaxDeniedUserCount = $00000022;
AccSessionProp_LocalIpAddress = $00000023;
AccSessionProp_MaxFavoriteLocationCount = $00000024;
AccSessionProp_Plugins = $00000025;
AccSessionProp_StoredImManager = $00000026;
AccSessionProp_PhoneNumber = $00000027;
AccSessionProp_Pause = $00000028;
AccSessionProp_Credentials = $00000029;
AccSessionProp_BartBase = $00002710;
AccSessionProp_SmallIcon = $00002710;
AccSessionProp_BuddyIcon = $00002711;
AccSessionProp_StatusText = $00002712;
AccSessionProp_ArriveSound = $00002713;
AccSessionProp_RichName = $00002714;
AccSessionProp_SuperIcon = $00002715;
AccSessionProp_RadioStation = $00002716;
AccSessionProp_SuperIconTrigger = $00002717;
AccSessionProp_StatusTextLink = $00002719;
AccSessionProp_E911Location = $0000271A;
AccSessionProp_Location = $0000271B;
AccSessionProp_BigIcon = $0000271C;
AccSessionProp_StatusTextTimestamp = $0000271D;
AccSessionProp_AvTrack = $0000271F;
AccSessionProp_DepartSound = $00002770;
AccSessionProp_Wallpaper = $00002791;
AccSessionProp_Badge = $00002794;
AccSessionProp_FlashWallpaper = $00002798;
AccSessionProp_ImmersiveWallpaper = $00002799;
AccSessionProp_BartMax = $0000370F;
-
type
AccSessionState = TOleEnum;
const
AccSessionState_Offline = $00000000;
AccSessionState_Disconnected = $00000032;
AccSessionState_Connecting = $00000064;
AccSessionState_Challenging = $00000096;
AccSessionState_Validating = $000000C8;
AccSessionState_SecurId = $000000D2;
AccSessionState_SecurIdNextKey = $000000D3;
AccSessionState_Transferring = $0000012C;
AccSessionState_Negotiating = $0000015E;
AccSessionState_Starting = $00000190;
AccSessionState_Online = $000001F4;
AccSessionState_WillShutdown = $00000226;
AccSessionState_Shutdown = $00000258;
AccSessionState_Paused = $000002BC;
type
AccSessionUiFlags = TOleEnum;
const
AccSessionUiFlags_HideChangeEmail = $00000001;
AccSessionUiFlags_HideConfirmEmail = $00000002;
AccSessionUiFlags_HideFormatScreenName = $00000004;
AccSessionUiFlags_HideSns = $00000008;
AccSessionUiFlags_DisableAlerts = $00000010;
AccSessionUiFlags_HideRegisStatusPref = $00000020;
type
AccShareBuddiesSessionProp = TOleEnum;
const
AccShareBuddiesSessionProp_Groups = $000003E8;
type
AccSubscriptionFlags = TOleEnum;
const
AccSubscriptionFlags_E911 = $40000000;
AccSubscriptionFlags_Voip = $80000000;
type
AccUpgradeInfoProp = TOleEnum;
const
AccUpgradeInfoProp_BuildNumber = $00000000;
AccUpgradeInfoProp_DownloadUrl = $00000001;
AccUpgradeInfoProp_InfoUrl = $00000002;
AccUpgradeInfoProp_Version = $00000003;
type
AccUserFlags = TOleEnum;
const
AccUserFlags_Unconfirmed = $00000001;
AccUserFlags_AOL = $00000004;
AccUserFlags_InternetFree = $00000010;
AccUserFlags_ICQ = $00000040;
AccUserFlags_Wireless = $00000080;
AccUserFlags_Internal = $00000100;
AccUserFlags_ImForwarding = $00000200;
AccUserFlags_Bot = $00000400;
AccUserFlags_Beast = $00000800;
AccUserFlags_OneWayForwarding = $00001000;
AccUserFlags_Official = $00002000;
AccUserFlags_BuddyMatchDirect = $00010000;
AccUserFlags_BuddyMatchIndirect = $00020000;
type
AccUserProp = TOleEnum;
const
AccUserProp_Session = $FFFFFFFF;
AccUserProp_Name = $00000000;
AccUserProp_FriendlyName = $00000002;
AccUserProp_State = $00000003;
AccUserProp_Flags = $00000004;
AccUserProp_Blocked = $00000005;
AccUserProp_Ignored = $00000006;
AccUserProp_OnlineTime = $00000007;
AccUserProp_IdleTime = $00000008;
AccUserProp_WarningPercent = $00000009;
AccUserProp_SmsChargeback = $0000000A;
AccUserProp_EmailAddress = $0000000B;
AccUserProp_Note = $0000000C;
AccUserProp_Frequency = $0000000D;
AccUserProp_InBuddyList = $0000000E;
AccUserProp_TrustedAsBuddy = $0000000F;
AccUserProp_BuddyFeedUpdateTime = $00000010;
AccUserProp_BuddyFeedViewTime = $00000011;
AccUserProp_BuddyFeedUrl = $00000012;
AccUserProp_Profile = $00000064;
AccUserProp_AwayMessage = $00000065;
AccUserProp_Capabilities = $00000066;
AccUserProp_Certificate = $00000067;
AccUserProp_HtmlInfo = $0000006E;
AccUserProp_DirEntry = $000000C8;
AccUserProp_BartBase = $00002710;
AccUserProp_SmallIcon = $00002710;
AccUserProp_BuddyIcon = $00002711;
AccUserProp_StatusText = $00002712;
AccUserProp_ArriveSound = $00002713;
AccUserProp_RichName = $00002714;
AccUserProp_SuperIcon = $00002715;
AccUserProp_RadioStation = $00002716;
AccUserProp_SuperIconTrigger = $00002717;
AccUserProp_StatusTextLink = $00002719;
AccUserProp_E911Location = $0000271A;
AccUserProp_Location = $0000271B;
AccUserProp_BigIcon = $0000271C;
AccUserProp_StatusTextTimestamp = $0000271D;
AccUserProp_AvTrack = $0000271F;
AccUserProp_DepartSound = $00002770;
AccUserProp_Wallpaper = $00002791;
AccUserProp_Badge = $00002794;
AccUserProp_FlashWallpaper = $00002798;
AccUserProp_ImmersiveWallpaper = $00002799;
AccUserProp_BartMax = $00003710;
AccUserProp_MaxFriendlyNameLength = $000186A0;
AccUserProp_MaxEmailAddressLength = $000186A1;
AccUserProp_MaxNoteLength = $000186A2;
type
AccUserState = TOleEnum;
const
AccUserState_Unknown = $FFFFFFFF;
AccUserState_Offline = $00000000;
AccUserState_Online = $00000001;
AccUserState_Idle = $00000002;
AccUserState_Away = $00000003;
type
AccWebPresencePrivacyMode = TOleEnum;
const
AccWebPresencePrivacyMode_UsePrivacyMode = $00000000;
AccWebPresencePrivacyMode_DenyNone = $00000001;
AccWebPresencePrivacyMode_PermitNone = $00000002;
type
AccLocationProp = TOleEnum;
const
AccLocationProp_Name = $00000000;
AccLocationProp_Latitude = $00000001;
AccLocationProp_Longitude = $00000002;
AccLocationProp_Altitude = $00000003;
AccLocationProp_HouseNum = $00000004;
AccLocationProp_HouseNumSuffix = $00000005;
AccLocationProp_Street = $00000006;
AccLocationProp_ExtraInfo = $00000007;
AccLocationProp_Neighborhood = $00000008;
AccLocationProp_District = $00000009;
AccLocationProp_City = $0000000A;
AccLocationProp_County = $0000000B;
AccLocationProp_State = $0000000C;
AccLocationProp_Country = $0000000D;
AccLocationProp_PostalCode = $0000000E;
AccLocationProp_Method = $0000000F;
AccLocationProp_MacAddress = $00000010;
AccLocationProp_GatewayMacAddress = $00000011;
AccLocationProp_IpAddress = $00000012;
AccLocationProp_GatewayIpAddress = $00000013;
AccLocationProp_Nickname = $00000014;
AccLocationProp_UseCount = $00000015;
type
AccClientInfoProp = TOleEnum;
const
AccClientInfoProp_Description = $00000000;
AccClientInfoProp_DistributionChannel = $00000002;
AccClientInfoProp_MajorVersion = $00000008;
AccClientInfoProp_MinorVersion = $00000009;
AccClientInfoProp_PointVersion = $0000000A;
AccClientInfoProp_BuildNumber = $0000000B;
AccClientInfoProp_Language = $00000010;
AccClientInfoProp_Country = $00000011;
type
AccCommandProp = TOleEnum;
const
AccCommandProp_Id = $00000000;
AccCommandProp_Text = $00000001;
AccCommandProp_SmallIconUrl = $00000002;
AccCommandProp_Flags = $00000003;
AccCommandProp_ParentId = $00000004;
type
-
IAccAvManager = interface;
IAccAvManagerDisp = dispinterface;
IAccSecondarySession = interface;
IAccSecondarySessionDisp = dispinterface;
IAccAvSession = interface;
IAccAvSessionDisp = dispinterface;
IAccBartItem = interface;
IAccBartItemDisp = dispinterface;
IAccCertificate = interface;
IAccCertificateDisp = dispinterface;
IAccCommandTarget = interface;
IAccDirEntry = interface;
IAccDirEntryDisp = dispinterface;
IAccEmoticon = interface;
IAccEmoticonDisp = dispinterface;
IAccEmoticonSet = interface;
IAccEmoticonSetDisp = dispinterface;
IAccFileSharingManager = interface;
IAccFileSharingManagerDisp = dispinterface;
IAccFileSharingSession = interface;
IAccFileSharingSessionDisp = dispinterface;
IAccFileSharingItem = interface;
IAccFileSharingItemDisp = dispinterface;
IAccFileXferManager = interface;
IAccFileXferManagerDisp = dispinterface;
IAccFileXferSession = interface;
IAccFileXferSessionDisp = dispinterface;
IAccLocation = interface;
IAccLocationDisp = dispinterface;
IAccPlugin = interface;
IAccSession = interface;
IAccSessionDisp = dispinterface;
IAccClientInfo = interface;
IAccClientInfoDisp = dispinterface;
IAccPreferencesHook = interface;
IAccBuddyList = interface;
IAccBuddyListDisp = dispinterface;
IAccGroup = interface;
IAccGroupDisp = dispinterface;
IAccUser = interface;
IAccUserDisp = dispinterface;
IAccSecurityManager = interface;
IAccSecurityManagerDisp = dispinterface;
IAccPluginManager = interface;
IAccPluginManagerDisp = dispinterface;
IAccPluginInfo = interface;
IAccPluginInfoDisp = dispinterface;
IAccCommand = interface;
IAccCommandDisp = dispinterface;
IAccPreferences = interface;
IAccPreferencesDisp = dispinterface;
IAccImSession = interface;
IAccImSessionDisp = dispinterface;
IAccIm = interface;
IAccImDisp = dispinterface;
IAccStream = interface;
IAccStreamDisp = dispinterface;
IAccCustomSession = interface;
IAccCustomSessionDisp = dispinterface;
IAccShareBuddiesManager = interface;
IAccShareBuddiesManagerDisp = dispinterface;
IAccShareBuddiesSession = interface;
IAccShareBuddiesSessionDisp = dispinterface;
IAccServiceTicket = interface;
IAccServiceTicketDisp = dispinterface;
IAccStoredImManager = interface;
IAccStoredImManagerDisp = dispinterface;
IAccStreamListener = interface;
IAccStreamListenerDisp = dispinterface;
IAccUpgradeInfo = interface;
IAccUpgradeInfoDisp = dispinterface;
DAccEvents = dispinterface;
IAccInstance = interface;
IAccInstanceDisp = dispinterface;
IAccAlert = interface;
IAccAlertDisp = dispinterface;
IAccParticipant = interface;
IAccParticipantDisp = dispinterface;
IAccFileXfer = interface;
IAccFileXferDisp = dispinterface;
IAccPluginAdapter = interface;
AccSession = IAccSession;
IAccAvManager = interface(IDispatch)
['']
function Get_Property_(Property_: AccAvManagerProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccAvManagerProp; value: OleVariant); safecall;
function CreateSession(const userName: WideString; flags: SYSINT): IAccSecondarySession; safecall;
function CreateMultipartySession(const reserved: WideString; flags: SYSINT): IAccSecondarySession; safecall;
function NormalizePhoneNumber(const inNumber: WideString): WideString; safecall;
property Property_[Property_: AccAvManagerProp]: OleVariant read Get_Property_;
end;
IAccAvManagerDisp = dispinterface
['']
property Property_[Property_: AccAvManagerProp]: OleVariant readonly dispid 1610743808;
function CreateSession(const userName: WideString; flags: SYSINT): IAccSecondarySession; dispid 1610743810;
function CreateMultipartySession(const reserved: WideString; flags: SYSINT): IAccSecondarySession; dispid 1610743811;
function NormalizePhoneNumber(const inNumber: WideString): WideString; dispid 1610743812;
end;
IAccSecondarySession = interface(IDispatch)
['']
function Get_ServiceId: AccSecondarySessionServiceId; safecall;
function Get_Property_(Property_: SYSINT): OleVariant; safecall;
procedure Set_Property_(Property_: SYSINT; value: OleVariant); safecall;
procedure Accept; safecall;
procedure Reject(reason: SYSINT); safecall;
function Invite(const invitee: WideString; const invitation: WideString): SYSINT; safecall;
procedure CancelProposal(const invitee: WideString); safecall;
function Eject(const userName: WideString; const reason: WideString): SYSINT; safecall;
procedure EndSession; safecall;
property ServiceId: AccSecondarySessionServiceId read Get_ServiceId;
property Property_[Property_: SYSINT]: OleVariant read Get_Property_;
end;
-
IAccSecondarySessionDisp = dispinterface
['']
property ServiceId: AccSecondarySessionServiceId readonly dispid 1610743808;
property Property_[Property_: SYSINT]: OleVariant readonly dispid 1610743809;
procedure Accept; dispid 1610743811;
procedure Reject(reason: SYSINT); dispid 1610743812;
function Invite(const invitee: WideString; const invitation: WideString): SYSINT; dispid 1610743813;
procedure CancelProposal(const invitee: WideString); dispid 1610743814;
function Eject(const userName: WideString; const reason: WideString): SYSINT; dispid 1610743815;
procedure EndSession; dispid 1610743816;
end;
IAccAvSession = interface(IAccSecondarySession)
['']
function Get_Property__(Property_: AccAvSessionProp): OleVariant; safecall;
procedure Set_Property__(Property_: AccAvSessionProp; value: OleVariant); safecall;
function GetVideoWindow(const userName: WideString): IDispatch; safecall;
procedure SendDtmf(const tones: WideString); safecall;
procedure SendSoundEffect(const url: WideString); safecall;
procedure Hold(on_: WordBool); safecall;
procedure StartRecording(const file_: WideString); safecall;
procedure StopRecording; safecall;
property Property__[Property_: AccAvSessionProp]: OleVariant read Get_Property__ write Set_Property__;
end;
IAccAvSessionDisp = dispinterface
['']
property Property__[Property_: AccAvSessionProp]: OleVariant dispid 1610809344;
function GetVideoWindow(const userName: WideString): IDispatch; dispid 1610809346;
procedure SendDtmf(const tones: WideString); dispid 1610809347;
procedure SendSoundEffect(const url: WideString); dispid 1610809348;
procedure Hold(on_: WordBool); dispid 1610809349;
procedure StartRecording(const file_: WideString); dispid 1610809350;
procedure StopRecording; dispid 1610809351;
property ServiceId: AccSecondarySessionServiceId readonly dispid 1610743808;
property Property_[Property_: SYSINT]: OleVariant readonly dispid 1610743809;
procedure Accept; dispid 1610743811;
procedure Reject(reason: SYSINT); dispid 1610743812;
function Invite(const invitee: WideString; const invitation: WideString): SYSINT; dispid 1610743813;
procedure CancelProposal(const invitee: WideString); dispid 1610743814;
function Eject(const userName: WideString; const reason: WideString): SYSINT; dispid 1610743815;
procedure EndSession; dispid 1610743816;
end;
IAccBartItem = interface(IDispatch)
['']
function Get_Property_(Property_: AccBartItemProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccBartItemProp; value: OleVariant); safecall;
function RequestProperty(Property_: AccBartItemProp): SYSINT; safecall;
property Property_[Property_: AccBartItemProp]: OleVariant read Get_Property_;
end;
IAccBartItemDisp = dispinterface
['']
property Property_[Property_: AccBartItemProp]: OleVariant readonly dispid 1610743808;
function RequestProperty(Property_: AccBartItemProp): SYSINT; dispid 1610743810;
end;
IAccCertificate = interface(IDispatch)
['']
function Get_Property_(Property_: AccCertificateProp): OleVariant; safecall;
function GetChain(wantRoot: WordBool): OleVariant; safecall;
procedure Verify(usage: SYSINT); safecall;
procedure Trust(trustFlags: SYSINT; permanent: WordBool); safecall;
property Property_[Property_: AccCertificateProp]: OleVariant read Get_Property_;
end;
IAccCertificateDisp = dispinterface
['']
property Property_[Property_: AccCertificateProp]: OleVariant readonly dispid 1610743808;
function GetChain(wantRoot: WordBool): OleVariant; dispid 1610743809;
procedure Verify(usage: SYSINT); dispid 1610743810;
procedure Trust(trustFlags: SYSINT; permanent: WordBool); dispid 1610743811;
end;
-
IAccCommandTarget = interface(IUnknown)
['']
function QueryStatus(command: SYSINT; users: OleVariant; out enabled: WordBool): HResult; stdcall;
function Exec(command: SYSINT; users: OleVariant): HResult; stdcall;
end;
IAccDirEntry = interface(IDispatch)
['']
function Get_Property_(Property_: AccDirEntryProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccDirEntryProp; value: OleVariant); safecall;
function GetMaxPropertyLen(Property_: AccDirEntryProp): SYSINT; safecall;
property Property_[Property_: AccDirEntryProp]: OleVariant read Get_Property_;
end;
IAccDirEntryDisp = dispinterface
['']
property Property_[Property_: AccDirEntryProp]: OleVariant readonly dispid 1610743808;
function GetMaxPropertyLen(Property_: AccDirEntryProp): SYSINT; dispid 1610743810;
end;
IAccEmoticon = interface(IDispatch)
['']
function Get_Data: OleVariant; safecall;
function Get_Text: WideString; safecall;
function Get_Property_(Property_: AccEmoticonProp): OleVariant; safecall;
property Data: OleVariant read Get_Data;
property Text: WideString read Get_Text;
property Property_[Property_: AccEmoticonProp]: OleVariant read Get_Property_;
end;
IAccEmoticonDisp = dispinterface
['']
property Data: OleVariant readonly dispid 1610743808;
property Text: WideString readonly dispid 1610743809;
property Property_[Property_: AccEmoticonProp]: OleVariant readonly dispid 1610743810;
end;
IAccEmoticonSet = interface(IDispatch)
['']
function Get_Property_(Property_: AccEmoticonSetProp): OleVariant; safecall;
function Get_Count: SYSINT; safecall;
function GetEmoticonByIndex(num: SYSINT): IAccEmoticon; safecall;
function GetEmoticonByText(const Text: WideString): IAccEmoticon; safecall;
property Property_[Property_: AccEmoticonSetProp]: OleVariant read Get_Property_;
property Count: SYSINT read Get_Count;
end;
IAccEmoticonSetDisp = dispinterface
['']
property Property_[Property_: AccEmoticonSetProp]: OleVariant readonly dispid 1610743808;
property Count: SYSINT readonly dispid 1610743809;
function GetEmoticonByIndex(num: SYSINT): IAccEmoticon; dispid 1610743810;
function GetEmoticonByText(const Text: WideString): IAccEmoticon; dispid 1610743811;
end;
IAccFileSharingManager = interface(IDispatch)
['']
function CreateSession(const userName: WideString; const invitation: WideString; flags: SYSINT): IAccFileSharingSession; safecall;
end;
IAccFileSharingManagerDisp = dispinterface
['']
function CreateSession(const userName: WideString; const invitation: WideString; flags: SYSINT): IAccFileSharingSession; dispid 1610743808;
end;
-
/
IAccFileSharingSession = interface(IAccSecondarySession)
['']
function Get_Property__(Property_: AccFileSharingSessionProp): OleVariant; safecall;
procedure Set_Property__(Property_: AccFileSharingSessionProp; value: OleVariant); safecall;
function GetItemByIndex(index: SYSINT): IAccFileSharingItem; safecall;
procedure StopRecv; safecall;
property Property__[Property_: AccFileSharingSessionProp]: OleVariant read Get_Property__;
end;
IAccFileSharingSessionDisp = dispinterface
['']
property Property__[Property_: AccFileSharingSessionProp]: OleVariant readonly dispid 1610809344;
function GetItemByIndex(index: SYSINT): IAccFileSharingItem; dispid 1610809346;
procedure StopRecv; dispid 1610809347;
property ServiceId: AccSecondarySessionServiceId readonly dispid 1610743808;
property Property_[Property_: SYSINT]: OleVariant readonly dispid 1610743809;
procedure Accept; dispid 1610743811;
procedure Reject(reason: SYSINT); dispid 1610743812;
function Invite(const invitee: WideString; const invitation: WideString): SYSINT; dispid 1610743813;
procedure CancelProposal(const invitee: WideString); dispid 1610743814;
function Eject(const userName: WideString; const reason: WideString): SYSINT; dispid 1610743815;
procedure EndSession; dispid 1610743816;
end;
IAccFileSharingItem = interface(IDispatch)
['']
function Get_Property_(Property_: AccFileSharingItemProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccFileSharingItemProp; value: OleVariant); safecall;
function RequestListing: SYSINT; safecall;
function GetItemByIndex(index: SYSINT): IAccFileSharingItem; safecall;
function RequestXfer: SYSINT; safecall;
property Property_[Property_: AccFileSharingItemProp]: OleVariant read Get_Property_;
end;
IAccFileSharingItemDisp = dispinterface
['']
property Property_[Property_: AccFileSharingItemProp]: OleVariant readonly dispid 1610743808;
function RequestListing: SYSINT; dispid 1610743810;
function GetItemByIndex(index: SYSINT): IAccFileSharingItem; dispid 1610743811;
function RequestXfer: SYSINT; dispid 1610743812;
end;
IAccFileXferManager = interface(IDispatch)
['']
function Send(const userName: WideString; const path: WideString;
const invitation: WideString; flags: SYSINT): IAccFileXferSession; safecall;
end;
IAccFileXferManagerDisp = dispinterface
['']
function Send(const userName: WideString; const path: WideString;
const invitation: WideString; flags: SYSINT): IAccFileXferSession; dispid 1610743808;
end;
IAccFileXferSession = interface(IAccSecondarySession)
['']
function Get_Property__(Property_: AccFileXferSessionProp): OleVariant; safecall;
procedure Set_Property__(Property_: AccFileXferSessionProp; value: OleVariant); safecall;
procedure ResolveCollision(action: AccFileXferSessionCollisionAction; const path: WideString); safecall;
property Property__[Property_: AccFileXferSessionProp]: OleVariant read Get_Property__;
end;
IAccFileXferSessionDisp = dispinterface
['']
property Property__[Property_: AccFileXferSessionProp]: OleVariant readonly dispid 1610809344;
procedure ResolveCollision(action: AccFileXferSessionCollisionAction; const path: WideString); dispid 1610809346;
property ServiceId: AccSecondarySessionServiceId readonly dispid 1610743808;
property Property_[Property_: SYSINT]: OleVariant readonly dispid 1610743809;
procedure Accept; dispid 1610743811;
procedure Reject(reason: SYSINT); dispid 1610743812;
function Invite(const invitee: WideString; const invitation: WideString): SYSINT; dispid 1610743813;
procedure CancelProposal(const invitee: WideString); dispid 1610743814;
function Eject(const userName: WideString; const reason: WideString): SYSINT; dispid 1610743815;
procedure EndSession; dispid 1610743816;
end;
IAccLocation = interface(IDispatch)
['']
function Get_Property_(prop: AccLocationProp): OleVariant; safecall;
procedure Set_Property_(prop: AccLocationProp; pv: OleVariant); safecall;
property Property_[prop: AccLocationProp]: OleVariant read Get_Property_;
end;
-
/
IAccLocationDisp = dispinterface
['']
property Property_[prop: AccLocationProp]: OleVariant readonly dispid 1610743808;
end;
IAccPlugin = interface(IUnknown)
['']
function Init(const session: IAccSession; const pluginInfo: IAccPluginInfo): HResult; stdcall;
function Shutdown: HResult; stdcall;
end;
IAccSession = interface(IDispatch)
['']
function Get_ClientInfo: IAccClientInfo; safecall;
procedure Set_PrefsHook(const Param1: IAccPreferencesHook); safecall;
procedure Set_Identity(const pIdentity: WideString); safecall;
procedure SignOn(const password: WideString); safecall;
procedure SetSecurIdKey(const key: WideString); safecall;
procedure SignOff; safecall;
function Get_State: AccSessionState; safecall;
function Get_Identity: WideString; safecall;
function Get_OtherInstances: OleVariant; safecall;
function Get_BuddyList: IAccBuddyList; safecall;
function Get_SecurityManager: IAccSecurityManager; safecall;
function Get_PluginManager: IAccPluginManager; safecall;
function Get_Prefs: IAccPreferences; safecall;
function Get_Property_(Property_: AccSessionProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccSessionProp; value: OleVariant); safecall;
function GetSecondaryManager(ServiceId: SYSINT): IDispatch; safecall;
function GetSecondarySessions(ServiceId: SYSINT): OleVariant; safecall;
function CreateGroup(const Name: WideString): IAccGroup; safecall;
function CreateUser(const Name: WideString): IAccUser; safecall;
function CreateImSession(const userName: WideString; sessionType: AccImSessionType): IAccImSession; safecall;
function CreateChatSession(const roomName: WideString; exchange: SYSINT; instance: SYSINT): IAccImSession; safecall;
function CreateCustomSession(const Uuid: WideString): IAccCustomSession; safecall;
function CreateIm(const Text: WideString; const type_: WideString): IAccIm; safecall;
function CreateBartItem(type_: AccBartItemType; const Id: WideString): IAccBartItem; safecall;
function CreateDirEntry: IAccDirEntry; safecall;
function CreateStream(const specifier: WideString): IAccStream; safecall;
function LookupUsers(users: OleVariant): SYSINT; safecall;
function SearchDirectory(query: OleVariant): SYSINT; safecall;
function SendInviteMail(const email: WideString; const message: WideString): SYSINT; safecall;
function RequestService(const ServiceId: WideString; qualifiers: OleVariant): SYSINT; safecall;
function ConfirmAccount: SYSINT; safecall;
procedure CancelEvent; safecall;
procedure AddCapabilities(caps: OleVariant); safecall;
procedure RemoveCapabilities(caps: OleVariant); safecall;
property ClientInfo: IAccClientInfo read Get_ClientInfo;
property PrefsHook: IAccPreferencesHook write Set_PrefsHook;
property State: AccSessionState read Get_State;
property OtherInstances: OleVariant read Get_OtherInstances;
property BuddyList: IAccBuddyList read Get_BuddyList;
property SecurityManager: IAccSecurityManager read Get_SecurityManager;
property PluginManager: IAccPluginManager read Get_PluginManager;
property Prefs: IAccPreferences read Get_Prefs;
property Property_[Property_: AccSessionProp]: OleVariant read Get_Property_;
end;
IAccSessionDisp = dispinterface
['']
property ClientInfo: IAccClientInfo readonly dispid 1610743808;
property PrefsHook: IAccPreferencesHook writeonly dispid 1610743809;
property Identity: WideString writeonly dispid 1610743810;
procedure SignOn(const password: WideString); dispid 1610743811;
procedure SetSecurIdKey(const key: WideString); dispid 1610743812;
procedure SignOff; dispid 1610743813;
property State: AccSessionState readonly dispid 1610743814;
property OtherInstances: OleVariant readonly dispid 1610743816;
property BuddyList: IAccBuddyList readonly dispid 1610743817;
property SecurityManager: IAccSecurityManager readonly dispid 1610743818;
property PluginManager: IAccPluginManager readonly dispid 1610743819;
property Prefs: IAccPreferences readonly dispid 1610743820;
property Property_[Property_: AccSessionProp]: OleVariant readonly dispid 1610743821;
function GetSecondaryManager(ServiceId: SYSINT): IDispatch; dispid 1610743823;
function GetSecondarySessions(ServiceId: SYSINT): OleVariant; dispid 1610743824;
function CreateGroup(const Name: WideString): IAccGroup; dispid 1610743825;
function CreateUser(const Name: WideString): IAccUser; dispid 1610743826;
function CreateImSession(const userName: WideString; sessionType: AccImSessionType): IAccImSession; dispid 1610743827;
function CreateChatSession(const roomName: WideString; exchange: SYSINT; instance: SYSINT): IAccImSession; dispid 1610743828;
function CreateCustomSession(const Uuid: WideString): IAccCustomSession; dispid 1610743829;
function CreateIm(const Text: WideString; const type_: WideString): IAccIm; dispid 1610743830;
function CreateBartItem(type_: AccBartItemType; const Id: WideString): IAccBartItem; dispid 1610743831;
function CreateDirEntry: IAccDirEntry; dispid 1610743832;
function CreateStream(const specifier: WideString): IAccStream; dispid 1610743833;
function LookupUsers(users: OleVariant): SYSINT; dispid 1610743834;
function SearchDirectory(query: OleVariant): SYSINT; dispid 1610743835;
function SendInviteMail(const email: WideString; const message: WideString): SYSINT; dispid 1610743836;
function RequestService(const ServiceId: WideString; qualifiers: OleVariant): SYSINT; dispid 1610743837;
function ConfirmAccount: SYSINT; dispid 1610743838;
procedure CancelEvent; dispid 1610743839;
procedure AddCapabilities(caps: OleVariant); dispid 1610743840;
procedure RemoveCapabilities(caps: OleVariant); dispid 1610743841;
end;
-
IAccClientInfo = interface(IDispatch)
['']
function Get_Property_(Property_: AccClientInfoProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccClientInfoProp; value: OleVariant); safecall;
property Property_[Property_: AccClientInfoProp]: OleVariant read Get_Property_;
end;
IAccClientInfoDisp = dispinterface
['']
property Property_[Property_: AccClientInfoProp]: OleVariant readonly dispid 1610743808;
end;
IAccPreferencesHook = interface(IUnknown)
['']
function GetValue(const specifier: WideString; out value: OleVariant): HResult; stdcall;
function GetDefaultValue(const specifier: WideString; out value: OleVariant): HResult; stdcall;
function SetValue(const specifier: WideString; value: OleVariant): HResult; stdcall;
function Reset(const specifier: WideString): HResult; stdcall;
function GetChildSpecifiers(const specifier: WideString; out value: OleVariant): HResult; stdcall;
end;
/
IAccBuddyList = interface(IDispatch)
['']
function Get_GroupCount: SYSINT; safecall;
function GetGroupByIndex(position: SYSINT): IAccGroup; safecall;
function GetGroupPosition(const group: IAccGroup): SYSINT; safecall;
function Get_Property_(Property_: AccBuddyListProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccBuddyListProp; value: OleVariant); safecall;
function InsertGroup(group: OleVariant; position: SYSINT): IAccGroup; safecall;
procedure RemoveGroup(position: SYSINT); safecall;
procedure MoveGroup(fromPosition: SYSINT; toPosition: SYSINT); safecall;
procedure MoveBuddy(fromGroup: SYSINT; fromPosition: SYSINT; toGroup: SYSINT; toPosition: SYSINT); safecall;
function GetGroupByName(const Name: WideString): IAccGroup; safecall;
function GetBuddyByName(const Name: WideString): IAccUser; safecall;
function GetFrequentBuddies(num: SYSINT): OleVariant; safecall;
property GroupCount: SYSINT read Get_GroupCount;
property Property_[Property_: AccBuddyListProp]: OleVariant read Get_Property_;
end;
IAccBuddyListDisp = dispinterface
['']
property GroupCount: SYSINT readonly dispid 1610743808;
function GetGroupByIndex(position: SYSINT): IAccGroup; dispid 1610743809;
function GetGroupPosition(const group: IAccGroup): SYSINT; dispid 1610743810;
property Property_[Property_: AccBuddyListProp]: OleVariant readonly dispid 1610743811;
function InsertGroup(group: OleVariant; position: SYSINT): IAccGroup; dispid 1610743813;
procedure RemoveGroup(position: SYSINT); dispid 1610743814;
procedure MoveGroup(fromPosition: SYSINT; toPosition: SYSINT); dispid 1610743815;
procedure MoveBuddy(fromGroup: SYSINT; fromPosition: SYSINT; toGroup: SYSINT; toPosition: SYSINT); dispid 1610743816;
function GetGroupByName(const Name: WideString): IAccGroup; dispid 1610743817;
function GetBuddyByName(const Name: WideString): IAccUser; dispid 1610743818;
function GetFrequentBuddies(num: SYSINT): OleVariant; dispid 1610743819;
end;
IAccGroup = interface(IDispatch)
['']
function Get_Name: WideString; safecall;
procedure Set_Name(const Name: WideString); safecall;
function Get_Property_(Property_: AccGroupProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccGroupProp; value: OleVariant); safecall;
function Get_BuddyCount: SYSINT; safecall;
function GetBuddyByIndex(position: SYSINT): IAccUser; safecall;
function GetBuddyPosition(const user: IAccUser): SYSINT; safecall;
function InsertBuddy(user: OleVariant; position: SYSINT): IAccUser; safecall;
procedure RemoveBuddy(position: SYSINT); safecall;
procedure MoveBuddy(fromPosition: SYSINT; toPosition: SYSINT); safecall;
function GetBuddyByName(const Name: WideString): IAccUser; safecall;
property Name: WideString read Get_Name write Set_Name;
property Property_[Property_: AccGroupProp]: OleVariant read Get_Property_;
property BuddyCount: SYSINT read Get_BuddyCount;
end;
-
IAccGroupDisp = dispinterface
['']
property Name: WideString dispid 0;
property Property_[Property_: AccGroupProp]: OleVariant readonly dispid 1610743810;
property BuddyCount: SYSINT readonly dispid 1610743812;
function GetBuddyByIndex(position: SYSINT): IAccUser; dispid 1610743813;
function GetBuddyPosition(const user: IAccUser): SYSINT; dispid 1610743814;
function InsertBuddy(user: OleVariant; position: SYSINT): IAccUser; dispid 1610743815;
procedure RemoveBuddy(position: SYSINT); dispid 1610743816;
procedure MoveBuddy(fromPosition: SYSINT; toPosition: SYSINT); dispid 1610743817;
function GetBuddyByName(const Name: WideString): IAccUser; dispid 1610743818;
end;
IAccUser = interface(IDispatch)
['']
function Get_Name: WideString; safecall;
function Get_Groups: OleVariant; safecall;
function Get_Property_(Property_: AccUserProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccUserProp; value: OleVariant); safecall;
function RequestProperty(Property_: AccUserProp): SYSINT; safecall;
function Report(notify: WordBool; const reason: WideString): SYSINT; safecall;
property Name: WideString read Get_Name;
property Groups: OleVariant read Get_Groups;
property Property_[Property_: AccUserProp]: OleVariant read Get_Property_;
end;
IAccUserDisp = dispinterface
['']
property Name: WideString readonly dispid 0;
property Groups: OleVariant readonly dispid 1610743809;
property Property_[Property_: AccUserProp]: OleVariant readonly dispid 1610743810;
function RequestProperty(Property_: AccUserProp): SYSINT; dispid 1610743812;
function Report(notify: WordBool; const reason: WideString): SYSINT; dispid 1610743813;
end;
IAccSecurityManager = interface(IDispatch)
['']
function Get_Property_(Property_: AccSecurityManagerProp): OleVariant; safecall;
procedure InitPassword(const password: WideString); safecall;
procedure Authenticate(const password: WideString); safecall;
function GetCertificates(usage: SYSINT): OleVariant; safecall;
function ImportCertificates(const pkcs12fileSpec: WideString; const pkcs12Password: WideString): OleVariant; safecall;
procedure ExportCertificates(const pkcs12fileSpec: WideString;
const pkcs12Password: WideString; const tokenPassword: WideString;
certs: OleVariant); safecall;
procedure ResetStore; safecall;
property Property_[Property_: AccSecurityManagerProp]: OleVariant read Get_Property_;
end;
IAccSecurityManagerDisp = dispinterface
['']
property Property_[Property_: AccSecurityManagerProp]: OleVariant readonly dispid 1610743808;
procedure InitPassword(const password: WideString); dispid 1610743809;
procedure Authenticate(const password: WideString); dispid 1610743810;
function GetCertificates(usage: SYSINT): OleVariant; dispid 1610743811;
function ImportCertificates(const pkcs12fileSpec: WideString; const pkcs12Password: WideString): OleVariant; dispid 1610743812;
procedure ExportCertificates(const pkcs12fileSpec: WideString;
const pkcs12Password: WideString; const tokenPassword: WideString;
certs: OleVariant); dispid 1610743813;
procedure ResetStore; dispid 1610743814;
end;
IAccPluginManager = interface(IDispatch)
['']
function GetInstalledPlugins: OleVariant; safecall;
function GetPluginByUuid(const Uuid: WideString): IAccPluginInfo; safecall;
function GetEnabledPlugins: OleVariant; safecall;
procedure EnablePlugin(const Uuid: WideString); safecall;
procedure DisablePlugin(const Uuid: WideString); safecall;
procedure QueryCommandStatus(const Uuid: WideString; command: SYSINT; value: OleVariant); safecall;
procedure ExecCommand(const Uuid: WideString; command: SYSINT; value: OleVariant); safecall;
end;
-
IAccPluginManagerDisp = dispinterface
['']
function GetInstalledPlugins: OleVariant; dispid 1610743808;
function GetPluginByUuid(const Uuid: WideString): IAccPluginInfo; dispid 1610743809;
function GetEnabledPlugins: OleVariant; dispid 1610743810;
procedure EnablePlugin(const Uuid: WideString); dispid 1610743811;
procedure DisablePlugin(const Uuid: WideString); dispid 1610743812;
procedure QueryCommandStatus(const Uuid: WideString; command: SYSINT; value: OleVariant); dispid 1610743813;
procedure ExecCommand(const Uuid: WideString; command: SYSINT; value: OleVariant); dispid 1610743814;
end;
IAccPluginInfo = interface(IDispatch)
['']
function Get_Uuid: WideString; safecall;
function Get_Property_(Property_: AccPluginInfoProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccPluginInfoProp; value: OleVariant); safecall;
function GetCommandById(command: SYSINT): IAccCommand; safecall;
function AddCommand(command: SYSINT): IAccCommand; safecall;
procedure RemoveCommand(command: SYSINT); safecall;
property Uuid: WideString read Get_Uuid;
property Property_[Property_: AccPluginInfoProp]: OleVariant read Get_Property_;
end;
IAccPluginInfoDisp = dispinterface
['']
property Uuid: WideString readonly dispid 0;
property Property_[Property_: AccPluginInfoProp]: OleVariant readonly dispid 1610743809;
function GetCommandById(command: SYSINT): IAccCommand; dispid 1610743811;
function AddCommand(command: SYSINT): IAccCommand; dispid 1610743812;
procedure RemoveCommand(command: SYSINT); dispid 1610743813;
end;
IAccCommand = interface(IDispatch)
['']
function Get_Id: SYSINT; safecall;
function Get_Property_(Property_: AccCommandProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccCommandProp; value: OleVariant); safecall;
function QueryStatus(usernames: OleVariant): WordBool; safecall;
procedure Exec(usernames: OleVariant); safecall;
property Id: SYSINT read Get_Id;
property Property_[Property_: AccCommandProp]: OleVariant read Get_Property_;
end;
IAccCommandDisp = dispinterface
['']
property Id: SYSINT readonly dispid 0;
property Property_[Property_: AccCommandProp]: OleVariant readonly dispid 1610743809;
function QueryStatus(usernames: OleVariant): WordBool; dispid 1610743811;
procedure Exec(usernames: OleVariant); dispid 1610743812;
end;
IAccPreferences = interface(IDispatch)
['']
function GetValue(const specifier: WideString): OleVariant; safecall;
function RequestValue(const specifier: WideString): SYSINT; safecall;
function GetDefaultValue(const specifier: WideString): OleVariant; safecall;
procedure SetValue(const specifier: WideString; value: OleVariant); safecall;
procedure Reset(const specifier: WideString); safecall;
function GetChildSpecifiers(const specifier: WideString): OleVariant; safecall;
end;
-
IAccPreferencesDisp = dispinterface
['']
function GetValue(const specifier: WideString): OleVariant; dispid 1610743808;
function RequestValue(const specifier: WideString): SYSINT; dispid 1610743809;
function GetDefaultValue(const specifier: WideString): OleVariant; dispid 1610743810;
procedure SetValue(const specifier: WideString; value: OleVariant); dispid 1610743811;
procedure Reset(const specifier: WideString); dispid 1610743812;
function GetChildSpecifiers(const specifier: WideString): OleVariant; dispid 1610743813;
end;
IAccImSession = interface(IAccSecondarySession)
['']
function Get_Property__(Property_: AccImSessionProp): OleVariant; safecall;
procedure Set_Property__(Property_: AccImSessionProp; value: OleVariant); safecall;
procedure Set_InputState(Param1: AccImInputState); safecall;
procedure SendIm(const im: IAccIm); safecall;
procedure SegmentIm(const im: IAccIm); safecall;
procedure ProposeChange(sessionType: AccImSessionType); safecall;
procedure StopRecv; safecall;
procedure StopSend; safecall;
property Property__[Property_: AccImSessionProp]: OleVariant read Get_Property__;
property InputState: AccImInputState write Set_InputState;
end;
IAccImSessionDisp = dispinterface
['']
property Property__[Property_: AccImSessionProp]: OleVariant readonly dispid 1610809344;
property InputState: AccImInputState writeonly dispid 1610809346;
procedure SendIm(const im: IAccIm); dispid 1610809347;
procedure SegmentIm(const im: IAccIm); dispid 1610809348;
procedure ProposeChange(sessionType: AccImSessionType); dispid 1610809349;
procedure StopRecv; dispid 1610809350;
procedure StopSend; dispid 1610809351;
property ServiceId: AccSecondarySessionServiceId readonly dispid 1610743808;
property Property_[Property_: SYSINT]: OleVariant readonly dispid 1610743809;
procedure Accept; dispid 1610743811;
procedure Reject(reason: SYSINT); dispid 1610743812;
function Invite(const invitee: WideString; const invitation: WideString): SYSINT; dispid 1610743813;
procedure CancelProposal(const invitee: WideString); dispid 1610743814;
function Eject(const userName: WideString; const reason: WideString): SYSINT; dispid 1610743815;
procedure EndSession; dispid 1610743816;
end;
IAccIm = interface(IDispatch)
['']
function Get_Text: WideString; safecall;
procedure Set_Text(const Text: WideString); safecall;
function Get_Property_(Property_: AccImProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccImProp; value: OleVariant); safecall;
function GetConvertedText(const type_: WideString): WideString; safecall;
procedure ConvertToMimeType(const type_: WideString); safecall;
function GetStream(const Id: WideString): IAccStream; safecall;
procedure SetStream(const Id: WideString; const stream: IAccStream); safecall;
property Text: WideString read Get_Text write Set_Text;
property Property_[Property_: AccImProp]: OleVariant read Get_Property_;
end;
IAccImDisp = dispinterface
['']
property Text: WideString dispid 0;
property Property_[Property_: AccImProp]: OleVariant readonly dispid 1610743810;
function GetConvertedText(const type_: WideString): WideString; dispid 1610743812;
procedure ConvertToMimeType(const type_: WideString); dispid 1610743813;
function GetStream(const Id: WideString): IAccStream; dispid 1610743814;
procedure SetStream(const Id: WideString; const stream: IAccStream); dispid 1610743815;
end;
IAccStream = interface(IDispatch)
['']
procedure SetAsyncListener(const piListener: IUnknown); safecall;
end;
IAccStreamDisp = dispinterface
['']
procedure SetAsyncListener(const piListener: IUnknown); dispid 1610743808;
end;
IAccCustomSession = interface(IAccSecondarySession)
['']
procedure SendData(const toName: WideString; streamId: SYSINT; const im: IAccIm); safecall;
procedure GetStream(const reserved: WideString; streamId: SYSINT; out pp: IAccStream); safecall;
end;
-
IAccCustomSessionDisp = dispinterface
['']
procedure SendData(const toName: WideString; streamId: SYSINT; const im: IAccIm); dispid 1610809344;
procedure GetStream(const reserved: WideString; streamId: SYSINT; out pp: IAccStream); dispid 1610809345;
property ServiceId: AccSecondarySessionServiceId readonly dispid 1610743808;
property Property_[Property_: SYSINT]: OleVariant readonly dispid 1610743809;
procedure Accept; dispid 1610743811;
procedure Reject(reason: SYSINT); dispid 1610743812;
function Invite(const invitee: WideString; const invitation: WideString): SYSINT; dispid 1610743813;
procedure CancelProposal(const invitee: WideString); dispid 1610743814;
function Eject(const userName: WideString; const reason: WideString): SYSINT; dispid 1610743815;
procedure EndSession; dispid 1610743816;
end;
IAccShareBuddiesManager = interface(IDispatch)
['']
function Send(const userName: WideString; Groups: OleVariant; flags: SYSINT): IAccShareBuddiesSession; safecall;
end;
IAccShareBuddiesManagerDisp = dispinterface
['']
function Send(const userName: WideString; Groups: OleVariant; flags: SYSINT): IAccShareBuddiesSession; dispid 1610743808;
end;
IAccShareBuddiesSession = interface(IAccSecondarySession)
['']
function Get_Property__(Property_: AccShareBuddiesSessionProp): OleVariant; safecall;
procedure Set_Property__(Property_: AccShareBuddiesSessionProp; value: OleVariant); safecall;
property Property__[Property_: AccShareBuddiesSessionProp]: OleVariant read Get_Property__;
end;
IAccShareBuddiesSessionDisp = dispinterface
['']
property Property__[Property_: AccShareBuddiesSessionProp]: OleVariant readonly dispid 1610809344;
property ServiceId: AccSecondarySessionServiceId readonly dispid 1610743808;
property Property_[Property_: SYSINT]: OleVariant readonly dispid 1610743809;
procedure Accept; dispid 1610743811;
procedure Reject(reason: SYSINT); dispid 1610743812;
function Invite(const invitee: WideString; const invitation: WideString): SYSINT; dispid 1610743813;
procedure CancelProposal(const invitee: WideString); dispid 1610743814;
function Eject(const userName: WideString; const reason: WideString): SYSINT; dispid 1610743815;
procedure EndSession; dispid 1610743816;
end;
IAccServiceTicket = interface(IDispatch)
['']
function Get_Property_(Property_: AccServiceTicketProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccServiceTicketProp; value: OleVariant); safecall;
property Property_[Property_: AccServiceTicketProp]: OleVariant read Get_Property_;
end;
-
IAccServiceTicketDisp = dispinterface
['']
property Property_[Property_: AccServiceTicketProp]: OleVariant readonly dispid 1610743808;
end;
IAccStoredImManager = interface(IDispatch)
['']
function RequestSummaries: SYSINT; safecall;
function DeliverIms(whichIms: OleVariant): SYSINT; safecall;
function DeleteIms(whichIms: OleVariant): SYSINT; safecall;
end;
IAccStoredImManagerDisp = dispinterface
['']
function RequestSummaries: SYSINT; dispid 1610743808;
function DeliverIms(whichIms: OleVariant): SYSINT; dispid 1610743809;
function DeleteIms(whichIms: OleVariant): SYSINT; dispid 1610743810;
end;
IAccStreamListener = interface(IUnknown)
['']
procedure OnDataAvailable(const stream: IAccStream); safecall;
procedure OnReadyForData(const stream: IAccStream); safecall;
procedure OnClosed(const stream: IAccStream; hr: AccResult); safecall;
end;
IAccStreamListenerDisp = dispinterface
['']
procedure OnDataAvailable(const stream: IAccStream); dispid 2000;
procedure OnReadyForData(const stream: IAccStream); dispid 2001;
procedure OnClosed(const stream: IAccStream; hr: AccResult); dispid 2002;
end;
IAccUpgradeInfo = interface(IDispatch)
['']
function Get_Property_(Property_: AccUpgradeInfoProp): OleVariant; safecall;
property Property_[Property_: AccUpgradeInfoProp]: OleVariant read Get_Property_;
end;
IAccUpgradeInfoDisp = dispinterface
['']
property Property_[Property_: AccUpgradeInfoProp]: OleVariant readonly dispid 1610743808;
end;
-
DAccEvents = dispinterface
['']
procedure OnStateChange(const session: IAccSession; State: AccSessionState; hr: AccResult); dispid 100;
procedure OnSessionChange(const session: IAccSession; prop: AccSessionProp); dispid 101;
procedure OnIdleStateChange(const session: IAccSession; secondsSinceActivity: SYSINT); dispid 102;
procedure OnInstanceChange(const session: IAccSession; const oldInstance: IAccInstance;
const newInstance: IAccInstance; prop: AccInstanceProp); dispid 103;
procedure OnLookupUsersResult(const session: IAccSession; emails: OleVariant; transId: SYSINT;
hr: AccResult; vUsers: OleVariant); dispid 105;
procedure OnSearchDirectoryResult(const session: IAccSession; transId: SYSINT; hr: AccResult;
vResults: OleVariant); dispid 106;
procedure OnSendInviteMailResult(const session: IAccSession; transId: SYSINT; hr: AccResult); dispid 107;
procedure OnRequestServiceResult(const session: IAccSession; transId: SYSINT; hr: AccResult;
const host: WideString; port: SYSINT; cookie: OleVariant); dispid 108;
procedure OnConfirmAccountResult(const session: IAccSession; transId: SYSINT; hr: AccResult); dispid 109;
procedure OnReportUserResult(const session: IAccSession; const user: IAccUser; transId: SYSINT;
hr: AccResult; deltaApplied: SYSINT; updatedValue: SYSINT); dispid 104;
procedure OnAlertReceived(const session: IAccSession; const alert: IAccAlert); dispid 110;
procedure OnPreferenceResult(const session: IAccSession; const specifier: WideString;
transId: SYSINT; vValue: OleVariant; hr: AccResult); dispid 301;
procedure OnPreferenceChange(const session: IAccSession; const specifier: WideString;
hr: AccResult); dispid 300;
procedure OnPreferenceInvalid(const session: IAccSession; const specifier: WideString;
hr: AccResult); dispid 302;
procedure OnPluginChange(const session: IAccSession; const plugin: IAccPluginInfo;
Property_: AccPluginInfoProp); dispid 400;
procedure OnBartItemRequestPropertyResult(const session: IAccSession;
const bartItem: IAccBartItem;
Property_: AccBartItemProp; transId: SYSINT;
hr: AccResult; propertyValue: OleVariant); dispid 120;
procedure OnUserRequestPropertyResult(const session: IAccSession; const user: IAccUser;
Property_: AccUserProp; transId: SYSINT; hr: AccResult;
propertyValue: OleVariant); dispid 121;
procedure OnGroupAdded(const session: IAccSession; const group: IAccGroup; position: SYSINT;
hr: AccResult); dispid 201;
procedure OnGroupRemoved(const session: IAccSession; const group: IAccGroup; hr: AccResult); dispid 202;
procedure OnGroupMoved(const session: IAccSession; const group: IAccGroup;
fromPosition: SYSINT; toPosition: SYSINT; hr: AccResult); dispid 203;
procedure OnBuddyAdded(const session: IAccSession; const group: IAccGroup;
const user: IAccUser; position: SYSINT; hr: AccResult); dispid 204;
procedure OnBuddyRemoved(const session: IAccSession; const group: IAccGroup;
const user: IAccUser; hr: AccResult); dispid 205;
procedure OnBuddyMoved(const session: IAccSession; const user: IAccUser;
const fromGroup: IAccGroup; fromPosition: SYSINT;
const toGroup: IAccGroup; toPosition: SYSINT; hr: AccResult); dispid 206;
procedure OnBuddyListChange(const session: IAccSession; const BuddyList: IAccBuddyList;
Property_: AccBuddyListProp); dispid 207;
procedure OnGroupChange(const session: IAccSession; const group: IAccGroup;
Property_: AccGroupProp); dispid 208;
procedure OnUserChange(const session: IAccSession; const oldUser: IAccUser;
const newUser: IAccUser; Property_: AccUserProp; hr: AccResult); dispid 209;
procedure OnChangesBegin(const session: IAccSession); dispid 210;
procedure OnChangesEnd(const session: IAccSession); dispid 211;
procedure OnNewSecondarySession(const session: IAccSession;
const secondarySession: IAccAvSession; ServiceId: SYSINT); dispid 500;
procedure OnSecondarySessionStateChange(const session: IAccSession;
const secondarySession: IAccAvSession;
State: AccSecondarySessionState; hr:
-
AccResult); dispid 501;
procedure OnSecondarySessionChange(const session: IAccSession;
const secondarySession: IAccAvSession; Property_: SYSINT); dispid 502;
procedure OnParticipantJoined(const session: IAccSession;
const secondarySession: IAccAvSession;
const participant: IAccParticipant); dispid 503;
procedure OnParticipantChange(const session: IAccSession;
const secondarySession: IAccAvSession;
const oldPart: IAccParticipant; const newPart: IAccParticipant;
prop: AccParticipantProp); dispid 505;
procedure OnParticipantLeft(const session: IAccSession; const secondarySession: IAccAvSession;
const participant: IAccParticipant; method: AccResult;
const by: WideString; const reason: WideString); dispid 504;
procedure OnInviteResult(const session: IAccSession; const secondarySession: IAccAvSession;
const userName: WideString; transId: SYSINT; hr: AccResult); dispid 506;
procedure OnEjectResult(const session: IAccSession; const secondarySession: IAccAvSession;
const userName: WideString; transId: SYSINT; hr: AccResult); dispid 507;
procedure BeforeImSend(const session: IAccSession; const imSession: IAccImSession;
const recipient: IAccParticipant; const im: IAccIm); dispid 600;
procedure OnImSent(const session: IAccSession; const imSession: IAccImSession;
const recipient: IAccParticipant; const im: IAccIm); dispid 601;
procedure OnImSendResult(const session: IAccSession; const imSession: IAccImSession;
const recipient: IAccParticipant; const im: IAccIm; hr: AccResult); dispid 602;
procedure BeforeImReceived(const session: IAccSession; const imSession: IAccImSession;
const sender: IAccParticipant; const im: IAccIm); dispid 603;
procedure OnImReceived(const session: IAccSession; const imSession: IAccImSession;
const sender: IAccParticipant; const im: IAccIm); dispid 604;
procedure OnLocalImReceived(const session: IAccSession; const imSession: IAccImSession;
const im: IAccIm); dispid 608;
procedure OnInputStateChange(const session: IAccSession; const imSession: IAccImSession;
const userName: WideString; State: AccImInputState); dispid 605;
procedure OnEmbedDownloadProgress(const session: IAccSession; const imSession: IAccImSession;
const im: IAccIm; const embedId: WideString;
const stream: IAccStream); dispid 606;
procedure OnEmbedDownloadComplete(const session: IAccSession; const imSession: IAccImSession;
const im: IAccIm); dispid 612;
procedure OnEmbedUploadProgress(const session: IAccSession; const imSession: IAccImSession;
const im: IAccIm; const embedId: WideString;
const stream: IAccStream); dispid 607;
procedure OnEmbedUploadComplete(const session: IAccSession; const imSession: IAccImSession;
const im: IAccIm); dispid 613;
procedure OnRateLimitStateChange(const session: IAccSession; const imSession: IAccImSession;
State: AccRateState); dispid 611;
procedure OnNewFileXfer(const session: IAccSession; const fileXferSession: IAccFileXferSession;
const fileXfer: IAccFileXfer); dispid 700;
procedure OnFileXferProgress(const session: IAccSession;
const fileXferSession: IAccFileXferSession;
const fileXfer: IAccFileXfer); dispid 701;
procedure OnFileXferCollision(const session: IAccSession;
const fileXferSession: IAccFileXferSession;
const fileXfer: IAccFileXfer); dispid 702;
procedure OnFileXferComplete(const session: IAccSession;
const fileXferSession: IAccFileXferSession;
const fileXfer: IAccFileXfer; hr: AccResult); dispid 703;
procedure OnFileXferSessionComplete(const session: IAccSession;
const fileXferSession: IAccFileXferSession; hr:
-
AccResult); dispid 704;
procedure OnFileSharingRequestListingResult(const session: IAccSession;
const fileSharingSession: IAccFileSharingSession;
const parentItem: IAccFileSharingItem;
transId: SYSINT; hr: AccResult); dispid 800;
procedure OnFileSharingRequestXferResult(const session: IAccSession;
const fileSharingSession: IAccFileSharingSession;
const fileXferSession: IAccFileXferSession;
transId: SYSINT; const fileXfer: IAccFileXfer); dispid 801;
procedure OnAvStreamStateChange(const session: IAccSession;
const avSession: IAccSecondarySession;
const userName: WideString; stream: AccAvStreamType;
State: AccSecondarySessionState; hr: AccResult); dispid 900;
procedure OnAvManagerChange(const session: IAccSession; const avManager: IAccAvManager;
prop: AccAvManagerProp; hr: AccResult); dispid 903;
procedure OnAudioLevelChange(const session: IAccSession; const avSession: IAccSecondarySession;
const userName: WideString; level: SYSINT); dispid 901;
procedure OnSoundEffectReceived(const session: IAccSession;
const avSession: IAccSecondarySession;
const userName: WideString; const url: WideString); dispid 902;
procedure OnCustomSendResult(const session: IAccSession;
const customSession: IAccCustomSession;
const recipient: IAccParticipant; const im: IAccIm; hr: AccResult); dispid 1002;
procedure OnCustomDataReceived(const session: IAccSession;
const customSession: IAccCustomSession;
const sender: IAccParticipant; const Data: IAccIm); dispid 1004;
procedure OnRequestSummariesResult(const session: IAccSession; transId: SYSINT; hr: AccResult;
imSummaries: OleVariant); dispid 1100;
procedure OnDeliverStoredImsResult(const session: IAccSession; transId: SYSINT; hr: AccResult); dispid 1101;
procedure OnDeleteStoredImsResult(const session: IAccSession; transId: SYSINT; hr: AccResult); dispid 1102;
end;
IAccInstance = interface(IDispatch)
['']
function Get_Id: SYSINT; safecall;
function Get_Property_(Property_: AccInstanceProp): OleVariant; safecall;
property Id: SYSINT read Get_Id;
property Property_[Property_: AccInstanceProp]: OleVariant read Get_Property_;
end;
IAccInstanceDisp = dispinterface
['']
property Id: SYSINT readonly dispid 0;
property Property_[Property_: AccInstanceProp]: OleVariant readonly dispid 1610743809;
end;
IAccAlert = interface(IDispatch)
['']
function Get_type_: AccAlertType; safecall;
function Get_Property_(Property_: SYSINT): OleVariant; safecall;
property type_: AccAlertType read Get_type_;
property Property_[Property_: SYSINT]: OleVariant read Get_Property_;
end;
IAccAlertDisp = dispinterface
['']
property type_: AccAlertType readonly dispid 1610743808;
property Property_[Property_: SYSINT]: OleVariant readonly dispid 1610743809;
end;
-
IAccParticipant = interface(IDispatch)
['']
function Get_Name: WideString; safecall;
function Get_user: IAccUser; safecall;
function Get_Property_(Property_: AccParticipantProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccParticipantProp; value: OleVariant); safecall;
property Name: WideString read Get_Name;
property user: IAccUser read Get_user;
property Property_[Property_: AccParticipantProp]: OleVariant read Get_Property_;
end;
IAccParticipantDisp = dispinterface
['']
property Name: WideString readonly dispid 1610743808;
property user: IAccUser readonly dispid 1610743809;
property Property_[Property_: AccParticipantProp]: OleVariant readonly dispid 1610743810;
end;
IAccFileXfer = interface(IDispatch)
['']
function Get_Property_(Property_: AccFileXferProp): OleVariant; safecall;
procedure Set_Property_(Property_: AccFileXferProp; value: OleVariant); safecall;
property Property_[Property_: AccFileXferProp]: OleVariant read Get_Property_;
end;
IAccFileXferDisp = dispinterface
['']
property Property_[Property_: AccFileXferProp]: OleVariant readonly dispid 1610743808;
end;
IAccPluginAdapter = interface(IUnknown)
['']
function Set_FileSpec(const Param1: WideString): HResult; stdcall;
end;
CoAccSession = class
class function Create: IAccSession;
class function CreateRemote(const MachineName: string): IAccSession;
end;
implementation
uses ComObj;
class function CoAccSession.Create: IAccSession;
begin
Result := CreateComObject(CLASS_AccSession) as IAccSession;
end;
class function CoAccSession.CreateRemote(const MachineName: string): IAccSession;
begin
Result := CreateRemoteComObject(MachineName, CLASS_AccSession) as IAccSession;
end;
end.
-
фу, наконецто:-)
заранее спасибо
-
пробую делать так:
procedure TForm1.Button1Click(Sender: TObject);
var aim: iaccsession;
begin
aim:=Coaccsession.Create;
end;
пишет что класс не зарегистрирован
как быть?
-
> как быть?
Для начала заглянуть в реестр и убедиться в том, что он действительно не зарегистрирован (или зарегистрирован не должным образом).
-
зарегистрирован класс IAccSession здесь:
HKEY_CLASSES_ROOT\Interface\{E0B2AA40-7BF5-11D3-A655-0060B0883B25}\ProxyStubClsid
но значение CLSID у него почемуто отличается от того,ю что мне сгенерировала делфи
в реестре {00020424-0000-0000-C000-000000000046}
в файле AccCoreLib_TLB.pas такая картина:
IAccSession = interface(IDispatch)
['{E0B2AA40-7BF5-11D3-A655-0060B0883B25}']
интересно, почему так происходит, что-то ускользает от моего понимания а что - не пойму...
вот к примеру добавил в uses модуль shdocvw и сделал так
procedure TForm1.Button1Click(Sender: TObject);
var ie: iwebbrowser2;
begin
ie:=CoInternetExplorer.Create;
ie.visible:=true;
ie.navigate.... ну итд
end;
все работает, а аол почемуто не хочет...
-
> из нее я импортировал библиотеку типов acccore.dll
А почему именно этот модуль был выбран тобой для импорта ?
-
Сергей М.
хм... он единственный импортировался из папки аола:-) я понял к чему вы ведете...
есть какаянибуть програмка, которой можно посмотреть какие сервера автоматизации предоставляет то или иное приложение?
-
> он единственный импортировался из папки аола
Ты все подряд что ли пробовал импортировать ?
То, что некий модуль содержит информацию о типах, еще не говорит о том, что этот модуль является модулем фабрики класса сервера автоматизации.
Подозреваю, что им может являться исполняемый (ехе) модуль IM-клиента.
> есть какаянибуть програмка, которой можно посмотреть какие
> сервера автоматизации предоставляет то или иное приложение?
>
>
Кое в чем поможет утилита OleView.exe из состава MS VisualStudio
|
Есть новые 
Нет новых [134430 +3][b:0.001][p:0.076]