MAPISessionUtils

unit: MAPISessionUtils.pas
file path: ..\Library\
version: 2014.хх
uses Classes, Windows, ExtendedMAPI, SysUtils, MAPIUtils, IMIEMTypes

Available functions:

function GetMAPISession - Initialize MAPI Subsystem and return IMAPISession Interface

procedure ReleaseMapiSession - Logoff from MAPI Session and UnInitialize MAPI Subsystem.
A client application calls the ReleaseMapiSession function to end its interaction with MAPI, begun with a call to the GetMAPISession function.
After ReleaseMapiSession is called, no other MAPI calls can be made by the client.

function GetProfileName - Returns current MAPI Profile Name, for example as "Outlook"

function GetProfiles - Returns all available MAPI/Outlook profiles

function GetExchangeServerName - Returns Microsoft Exchange Server Name

function GetAddressBook - Returns interface to MAPI Address Book

procedure GetRecipientsFromAB - Displays the Outlook address book dialog box and returns an aray of TRecipientHead

function GetMAPIStoresTable - Returns the message store table that contains information about all the message stores in the session profile.

function GetMsgStoreType - Returns MAPI Store type - i.e. Local, Exchange Private, Exchange Public, etc..

function GetMAPIStores - Returns an array of all available MsgStores
procedure ClearStoresHeadList - Clears the memory occupied by the TStoresHeadList structure returned by the function GetMAPIStores

function GetDefaultStore - Returns default MsgStore for the current MAPI Session

function GetMAPIStore - Returns specific MsgStore from its entry identifier

function IsExchangeStore - Returns True is MsgStore is an Exchange Server Store, as Mailbox Store, as Public Store, as Delegated Store, etc..

procedure ReleaseMsgStore - Close and release IMsgStore.

function IsSameMAPIObject - Compares the entry identifier with an opened MAPI property object
function IsSameEntryIDs - Compares two entry identifiers to determine whether they refer to the same object.

function GetProfileServiceVersion - Detect the version of Microsoft Exchange server in an Outlook (2007 and above) profile

function EnableReconnect - Enables the MAPI global catalog server reconnect logic to work correctly in a MAPI profile.

function DeleteProfile - Deletes a MAPI/Outlook profile.

function SelectABUsers - Displays the Outlook address book dialog box.
function SelectABUsersEx - Displays the Outlook address book dialog box (extended version).

function ResolveRecipients - Performs name resolution, assigning entry identifiers to recipients in a recipient list.
function ForceSMTPAddress - Performs name resolution, and converts Exchange-based email address into SMTP email address, i.e. converts /O=ORGANIZATION_NAME/OU=EXCHANGE_GROUP/CN=RECIPIENTS/CN=USER_NAME to USER_NAME@DOMAIN.COM

procedure AddPSTToProfile - Adds a PST (Personal Storage Table) file to and Outlook profile. If file does not exists, a new one is created.

function SvcAdminOpenProfileSection - Opens a Profile Section with full access
function ProvAdminOpenProfileSection - Opens a Profile Section with full access

procedure MarkExistingProviders - Service (internal) function, mark/find providers
function FindUnmarkedProvider - Service (internal) function, mark/find providers

function GetExchangeGlobalAddressList - Returns Exchange Server Global Address List - GAL

procedure AddDelegateExchangeMailBox - Adds additional mailboxes to an existing mail profile

function GetMAPISession(const DlgHwnd: UINT_PTR = 0; const ProfileName: String = ''; const LogonFlags: Cardinal = MAPI_USE_DEFAULT; const FromService: Boolean = False; const MultiThreaded: Boolean = False): IMAPISession;

description
Initialize MAPI Subsystem and return IMAPISession Interface

parameters

DlgHwnd - Handle for Logon Dialog. If it is 0 (zero) Logon Dialog will be Modeless
ProfileName - Profile name. Specify it if you like to open explicit profile
LogonFlags - flags as MAPI_NO_MAIL and etc.. See MSDN documentation for options
FromService - Is it Windows Service? See MSDN documentation for more information.
MultiThreaded - Is it MultiThreaded applicaion? See MSDN documentation for more information.

usage

// Get MAPI Session
MAPISession := GetMAPISession(Self.Handle, '', MAPI_LOGON_UI);
if Assigned(MAPISession) then
StoreList := GetMAPIStores(MAPISession);