reading Outlook address list

Posted on 2001-08-24
Last Modified: 2010-04-06
Dear all,

Could anyone please suggest a way (possibly code or a component) that allows to read MS Outlook address books(97 and up). My app has some address book related features and it would be nice to re-use existing addresses rather than reinvent the wheel and ask the user to retype them into the app.

Thanks a million
Question by:vladh

Expert Comment

ID: 6421288

Well I can provide you with a link which contains an article on how to integrate outlook from withing Delphi.

It contains enough information to get you started and also shows an example on how to get the data from the different contacts from outlook.

Here you will also find plenty of information on how to automate different office products from within Delphi :

There was also a good atricle on but you need to have a subscription to the magazine.  If you don't have it I could maybe send you the article itself, but I need to have permission from DelphiMagazine for that I think.

If I find anything else , I'll let you know.

Best regards,


Author Comment

ID: 6421371

Thanks for the links. These links and most of what I found so far is using OLE to start outlook and then read the contacts... While it is a workable solution, I would like to see a way of reading PAB files without having to open Outlook and dealing with OLE...

Thanks again

Expert Comment

ID: 6421407
Without OLE? That makes it a bit more difficult..., not even sure if you can do it without the OLE.

ScreenConnect 6.0 Free Trial

At ScreenConnect, partner feedback doesn't fall on deaf ears. We collected partner suggestions off of their virtual wish list and transformed them into one game-changing release: ScreenConnect 6.0. Explore all of the extras and enhancements for yourself!


Accepted Solution

jsweby earned 100 total points
ID: 6421421
This should put the contact book entries into a listbox ContactsList.

uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
   OutlookApp, Mapi, Personal, Contacts: Variant;
   i: Integer;
     OutlookApp := CreateOleObject('Outlook.Application');

     Mapi := OutlookApp.GetNameSpace('MAPI');
     For i := 1 to Mapi.Folders.Count Do

     Personal := Mapi.Folders('Mailbox - User name');

     Contacts := Personal.Folders('Contacts');
     For i := 1 to Contacts.Items.Count Do

     OutlookApp := Unassigned;


Expert Comment

ID: 6422113
If you just need a copy of the data you can read easier, why not simply export them?

LVL 17

Assisted Solution

inthe earned 100 total points
ID: 6424347
if you dont want ole via outlook
(especially if user dont have outlook )
you could use the Windows address book api (wab) ,jedi have translated the headers to delphi at:

comes with sample etc..

(note ,if you move pas files from into different dir the pas file locations in demos are "hardcoded" in dpr
i wondered at first why it wouldnt compile then i realised ;-) i had moved pas files to different location,but after changing dpr it compiles fine.

Expert Comment

ID: 6975897
ADMINISTRATION WILL BE CONTACTING YOU SHORTLY.  Moderators Computer101 or Netminder will return to finalize these if they are still open in 14 days.  Experts, please post closing recommendations before that time.

Below are your open questions as of today.  Questions which have been inactive for 21 days or longer are considered to be abandoned and for those, your options are:
1. Accept a Comment As Answer (use the button next to the Expert's name).
2. Close the question if the information was not useful to you, but may help others. You must tell the participants why you wish to do this, and allow for Expert response.  This choice will include a refund to you, and will move this question to our PAQ (Previously Asked Question) database.  If you found information outside this question thread, please add it.
3. Ask Community Support to help split points between participating experts, or just comment here with details and we'll respond with the process.
4. Delete the question (if it has no potential value for others).
   --> Post comments for expert of your intention to delete and why
   --> YOU CANNOT DELETE A QUESTION with comments; special handling by a Moderator is required.

For special handling needs, please post a zero point question in the link below and include the URL (question QID/link) that it regards with details.
Please click this link for Help Desk, Guidelines/Member Agreement and the Question/Answer process.

Click you Member Profile to view your question history and please keep them updated. If you are a KnowledgePro user, use the Power Search option to find them.  

Questions which are LOCKED with a Proposed Answer but do not help you, should be rejected with comments added.  When you grade the question less than an A, please comment as to why.  This helps all involved, as well as others who may access this item in the future.  PLEASE DO NOT AWARD POINTS TO ME.

To view your open questions, please click the following link(s) and keep them all current with updates.

*****  E X P E R T S    P L E A S E  ******  Leave your closing recommendations.
If you are interested in the cleanup effort, please click this link 
POINTS FOR EXPERTS awaiting comments are listed in the link below
Moderators will finalize this question if in @14 days Asker has not responded.  This will be moved to the PAQ (Previously Asked Questions) at zero points, deleted or awarded.
Thanks everyone.
Moderator @ Experts Exchange
LVL 17

Expert Comment

ID: 9288156
No comment has been added lately, so it's time to clean up this TA.
I will leave a recommendation in the Cleanup topic area that this question is:

split points between jsweby and inthe

Please leave any comments here within the next seven days.



EE Cleanup Volunteer

Featured Post

Problems using Powershell and Active Directory?

Managing Active Directory does not always have to be complicated.  If you are spending more time trying instead of doing, then it's time to look at something else. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
This Micro Tutorial demonstrates using Microsoft Excel pivot tables, how to reverse engineer competitors' marketing strategies through backlinks.
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

810 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question