使用 OLE 和 Delphi 列出给定日期的所有 Outlook 约会答案

【问题标题】：Listing all Outlook appointments for a given date using OLE and Delphi使用 OLE 和 Delphi 列出给定日期的所有 Outlook 约会
【发布时间】：2010-01-28 05:02:55
【问题描述】：

我一直在尝试通过在 delphi 下使用 OLE 在 tmemo 上列出给定日期（比如今天）的约会。到目前为止，它一直不成功。基本代码以

开头

  try
    Outlook := GetActiveOleObject('outlook.application');
  except
    Outlook := CreateOleObject('outlook.application');
  end;

  Namespace := Outlook.GetNamespace('MAPI');
  Calendar := Namespace.GetDefaultFolder(olFolderCalendar);  // or use $000009

从那里我尝试访问 Calendar.Items，但每次都得到不同的结果，即使我将选项设置为 true，我也看不到定期约会。

有没有办法使用 Delphi 7 列出给定日期的约会？代码表示赞赏。

谢谢

【问题讨论】：

标签： delphi outlook ole

【解决方案1】：

几年前我不得不这样做，发现它令人沮丧。使用包含 Outlook 所有细微差别的库要容易得多。我强烈推荐来自RapWare 的EasyMAPI。

编辑：未经测试，但我确实找到了作者声称有效的一些sample code（如果您滚动到最底部，您可以看到回复的文本）。这可以作为一个起点。

【讨论】：

谢谢，但我需要一个完整的库是一种矫枉过正。感谢您的信息

【解决方案2】：

好的，我在谷歌上找到了答案。

这里：

http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_22095294.html

【讨论】：