📄 outlook_tlb.pas
字号:
_DocumentItem = interface;
_DocumentItemDisp = dispinterface;
ExplorersEvents = dispinterface;
FoldersEvents = dispinterface;
InspectorsEvents = dispinterface;
ItemsEvents = dispinterface;
_JournalItem = interface;
_JournalItemDisp = dispinterface;
NameSpaceEvents = dispinterface;
_NoteItem = interface;
_NoteItemDisp = dispinterface;
OutlookBarGroup = interface;
OutlookBarGroupDisp = dispinterface;
_OutlookBarShortcuts = interface;
_OutlookBarShortcutsDisp = dispinterface;
OutlookBarShortcut = interface;
OutlookBarShortcutDisp = dispinterface;
_OutlookBarGroups = interface;
_OutlookBarGroupsDisp = dispinterface;
OutlookBarGroupsEvents = dispinterface;
_OutlookBarPane = interface;
_OutlookBarPaneDisp = dispinterface;
OutlookBarStorage = interface;
OutlookBarStorageDisp = dispinterface;
OutlookBarPaneEvents = dispinterface;
OutlookBarShortcutsEvents = dispinterface;
PropertyPage = interface;
PropertyPageSite = interface;
PropertyPageSiteDisp = dispinterface;
Pages = interface;
PagesDisp = dispinterface;
_PostItem = interface;
_PostItemDisp = dispinterface;
_RemoteItem = interface;
_RemoteItemDisp = dispinterface;
_ReportItem = interface;
_ReportItemDisp = dispinterface;
_TaskItem = interface;
_TaskItemDisp = dispinterface;
_TaskRequestAcceptItem = interface;
_TaskRequestAcceptItemDisp = dispinterface;
_TaskRequestDeclineItem = interface;
_TaskRequestDeclineItemDisp = dispinterface;
_TaskRequestItem = interface;
_TaskRequestItemDisp = dispinterface;
_TaskRequestUpdateItem = interface;
_TaskRequestUpdateItemDisp = dispinterface;
_IRecipientControl = interface;
_DRecipientControl = dispinterface;
_DRecipientControlEvents = dispinterface;
_IDocSiteControl = interface;
_DDocSiteControl = dispinterface;
_DDocSiteControlEvents = dispinterface;
// *********************************************************************//
// Declaration of CoClasses defined in Type Library
// (NOTE: Here we map each CoClass to its Default Interface)
// *********************************************************************//
SyncObject = _SyncObject;
Explorer = _Explorer;
Inspector = _Inspector;
MailItem = _MailItem;
AppointmentItem = _AppointmentItem;
MeetingItem = _MeetingItem;
TaskItem = _TaskItem;
OutlookApplication = _Application;
ContactItem = _ContactItem;
DistListItem = _DistListItem;
DocumentItem = _DocumentItem;
Explorers = _Explorers;
Inspectors = _Inspectors;
Folders = _Folders;
Items = _Items;
JournalItem = _JournalItem;
NameSpace = _NameSpace;
NoteItem = _NoteItem;
OutlookBarGroups = _OutlookBarGroups;
OutlookBarPane = _OutlookBarPane;
OutlookBarShortcuts = _OutlookBarShortcuts;
PostItem = _PostItem;
RemoteItem = _RemoteItem;
ReportItem = _ReportItem;
TaskRequestAcceptItem = _TaskRequestAcceptItem;
TaskRequestDeclineItem = _TaskRequestDeclineItem;
TaskRequestItem = _TaskRequestItem;
TaskRequestUpdateItem = _TaskRequestUpdateItem;
_RecipientControl = _DRecipientControl;
_DocSiteControl = _DDocSiteControl;
// *********************************************************************//
// Declaration of structures, unions and aliases.
// *********************************************************************//
PWordBool1 = ^WordBool; {*}
PUserType1 = ^TGUID; {*}
PShortint1 = ^Shortint; {*}
PPShortint1 = ^PShortint1; {*}
PUserType2 = ^TGUID; {*}
// *********************************************************************//
// Interface: Action
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00063043-0000-0000-C000-000000000046}
// *********************************************************************//
Action = interface(IDispatch)
['{00063043-0000-0000-C000-000000000046}']
function Get_Application: _Application; safecall;
function Get_Class_: OlObjectClass; safecall;
function Get_Session: _NameSpace; safecall;
function Get_Parent: IDispatch; safecall;
function Get_CopyLike: OlActionCopyLike; safecall;
procedure Set_CopyLike(CopyLike: OlActionCopyLike); safecall;
function Get_Enabled: WordBool; safecall;
procedure Set_Enabled(Enabled: WordBool); safecall;
function Get_MessageClass: WideString; safecall;
procedure Set_MessageClass(const MessageClass: WideString); safecall;
function Get_Name: WideString; safecall;
procedure Set_Name(const Name: WideString); safecall;
function Get_Prefix: WideString; safecall;
procedure Set_Prefix(const Prefix: WideString); safecall;
function Get_ReplyStyle: OlActionReplyStyle; safecall;
procedure Set_ReplyStyle(ReplyStyle: OlActionReplyStyle); safecall;
function Get_ResponseStyle: OlActionResponseStyle; safecall;
procedure Set_ResponseStyle(ResponseStyle: OlActionResponseStyle); safecall;
function Get_ShowOn: OlActionShowOn; safecall;
procedure Set_ShowOn(ShowOn: OlActionShowOn); safecall;
procedure Delete; safecall;
function Execute: IDispatch; safecall;
property Application: _Application read Get_Application;
property Class_: OlObjectClass read Get_Class_;
property Session: _NameSpace read Get_Session;
property Parent: IDispatch read Get_Parent;
property CopyLike: OlActionCopyLike read Get_CopyLike write Set_CopyLike;
property Enabled: WordBool read Get_Enabled write Set_Enabled;
property MessageClass: WideString read Get_MessageClass write Set_MessageClass;
property Name: WideString read Get_Name write Set_Name;
property Prefix: WideString read Get_Prefix write Set_Prefix;
property ReplyStyle: OlActionReplyStyle read Get_ReplyStyle write Set_ReplyStyle;
property ResponseStyle: OlActionResponseStyle read Get_ResponseStyle write Set_ResponseStyle;
property ShowOn: OlActionShowOn read Get_ShowOn write Set_ShowOn;
end;
// *********************************************************************//
// DispIntf: ActionDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00063043-0000-0000-C000-000000000046}
// *********************************************************************//
ActionDisp = dispinterface
['{00063043-0000-0000-C000-000000000046}']
property Application: _Application readonly dispid 61440;
property Class_: OlObjectClass readonly dispid 61450;
property Session: _NameSpace readonly dispid 61451;
property Parent: IDispatch readonly dispid 61441;
property CopyLike: OlActionCopyLike dispid 100;
property Enabled: WordBool dispid 103;
property MessageClass: WideString dispid 26;
property Name: WideString dispid 12289;
property Prefix: WideString dispid 61;
property ReplyStyle: OlActionReplyStyle dispid 101;
property ResponseStyle: OlActionResponseStyle dispid 102;
property ShowOn: OlActionShowOn dispid 105;
procedure Delete; dispid 108;
function Execute: IDispatch; dispid 106;
end;
// *********************************************************************//
// Interface: _Application
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00063001-0000-0000-C000-000000000046}
// *********************************************************************//
_Application = interface(IDispatch)
['{00063001-0000-0000-C000-000000000046}']
function Get_Application: _Application; safecall;
function Get_Class_: OlObjectClass; safecall;
function Get_Session: _NameSpace; safecall;
function Get_Parent: IDispatch; safecall;
function Get_Assistant: Assistant; safecall;
function Get_Name: WideString; safecall;
function Get_Version: WideString; safecall;
function ActiveExplorer: _Explorer; safecall;
function ActiveInspector: _Inspector; safecall;
function CreateItem(ItemType: OlItemType): IDispatch; safecall;
function CreateItemFromTemplate(const TemplatePath: WideString; InFolder: OleVariant): IDispatch; safecall;
function CreateObject(const ObjectName: WideString): IDispatch; safecall;
function GetNamespace(const Type_: WideString): _NameSpace; safecall;
procedure Quit; safecall;
function Get_COMAddIns: COMAddIns; safecall;
function Get_Explorers: _Explorers; safecall;
function Get_Inspectors: _Inspectors; safecall;
function Get_LanguageSettings: LanguageSettings; safecall;
function Get_ProductCode: WideString; safecall;
function Get_AnswerWizard: AnswerWizard; safecall;
function Get_FeatureInstall: MsoFeatureInstall; safecall;
procedure Set_FeatureInstall(FeatureInstall: MsoFeatureInstall); safecall;
function ActiveWindow: IDispatch; safecall;
property Application: _Application read Get_Application;
property Class_: OlObjectClass read Get_Class_;
property Session: _NameSpace read Get_Session;
property Parent: IDispatch read Get_Parent;
property Assistant: Assistant read Get_Assistant;
property Name: WideString read Get_Name;
property Version: WideString read Get_Version;
property COMAddIns: COMAddIns read Get_COMAddIns;
property Explorers: _Explorers read Get_Explorers;
property Inspectors: _Inspectors read Get_Inspectors;
property LanguageSettings: LanguageSettings read Get_LanguageSettings;
property ProductCode: WideString read Get_ProductCode;
property AnswerWizard: AnswerWizard read Get_AnswerWizard;
property FeatureInstall: MsoFeatureInstall read Get_FeatureInstall write Set_FeatureInstall;
end;
// *********************************************************************//
// DispIntf: _ApplicationDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00063001-0000-0000-C000-000000000046}
// *********************************************************************//
_ApplicationDisp = dispinterface
['{00063001-0000-0000-C000-000000000046}']
property Application: _Application readonly dispid 61440;
property Class_: OlObjectClass readonly dispid 61450;
property Session: _NameSpace readonly dispid 61451;
property Parent: IDispatch readonly dispid 61441;
property Assistant: Assistant readonly dispid 276;
property Name: WideString readonly dispid 12289;
property Version: WideString readonly dispid 278;
function ActiveExplorer: _Explorer; dispid 273;
function ActiveInspector: _Inspector; dispid 274;
function CreateItem(ItemType: OlItemType): IDispatch; dispid 266;
function CreateItemFromTemplate(const TemplatePath: WideString; InFolder: OleVariant): IDispatch; dispid 267;
function CreateObject(const ObjectName: WideString): IDispatch; dispid 277;
function GetNamespace(const Type_: WideString): _NameSpace; dispid 272;
procedure Quit; dispid 275;
property COMAddIns: COMAddIns readonly dispid 280;
property Explorers: _Explorers readonly dispid 281;
property Inspectors: _Inspectors readonly dispid 282;
property LanguageSettings: LanguageSettings readonly dispid 283;
property ProductCode: WideString readonly dispid 284;
property AnswerWizard: AnswerWizard readonly dispid 285;
property FeatureInstall: MsoFeatureInstall dispid 286;
function ActiveWindow: IDispatch; dispid 287;
end;
// *********************************************************************//
// Interface: _NameSpace
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00063002-0000-0000-C000-000000000046}
// *********************************************************************//
_NameSpace = interface(IDispatch)
['{00063002-0000-0000-C000-000000000046}']
function Get_Application: _Application; safecall;
function Get_Class_: OlObjectClass; safecall;
function Get_Session: _NameSpace; safecall;
function Get_Parent: IDispatch; safecall;
function Get_CurrentUser: Recipient; safecall;
function Get_Folders: _Folders; safecall;
function Get_Type_: WideString; safecall;
function Get_AddressLists: AddressLists; safecall;
function CreateRecipient(const RecipientName: WideString): Recipient; safecall;
function GetDefaultFolder(FolderType: OlDefaultFolders): MAPIFolder; safecall;
function GetFolderFromID(const EntryIDFolder: WideString; EntryIDStore: OleVariant): MAPIFolder; safecall;
function GetItemFromID(const EntryIDItem: WideString; EntryIDStore: OleVariant): IDispatch; safecall;
function GetRecipientFromID(const EntryID: WideString): Recipient; safecall;
function GetSharedDefaultFolder(const Recipient: Recipient; FolderType: OlDefaultFolders): MAPIFolder; safecall;
procedure Logoff; safecall;
procedure Logon(Profile: OleVariant; Password: OleVariant; ShowDialog: OleVariant;
NewSession: OleVariant); safecall;
function PickFolder: MAPIFolder; safecall;
procedure RefreshRemoteHeaders; safecall;
function Get_SyncObjects: SyncObjects; safecall;
procedure AddStore(Store: OleVariant); safecall;
procedure RemoveStore(const Folder: MAPIFolder); safecall;
property Application: _Application read Get_Application;
property Class_: OlObjectClass read Get_Class_;
property Session: _NameSpace read Get_Session;
property Parent: IDispatch read Get_Parent;
property CurrentUser: Recipient read Get_CurrentUser;
property Folders: _Folders read Get_Folders;
property Type_: WideString read Get_Type_;
property AddressLists: AddressLists read Get_AddressLists;
property SyncObjects: SyncObjects read Get_SyncObjects;
end;
// *********************************************************************//
// DispIntf: _NameSpaceDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00063002-0000-0000-C000-000000000046}
// *********************************************************************//
_NameSpaceDisp = dispinterface
['{00063002-0000-0000-C000-000000000046}']
property Application: _Application readonly dispid 61440;
property Class_: OlObjectClass readonly dispid 61450;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -