OLE 및 Delphi를 사용하여 주어진 날짜에 대한 모든 Outlook 약속 나열

저는 델파이에서 OLE를 사용하여 tmemo에 주어진 날짜 (오늘)에 대한 약속을 나열하려고했습니다. 지금까지 성공하지 못했습니다. 기본 코드는 내가 Calendar.Items에 액세스하려고 거기에서OLE 및 Delphi를 사용하여 주어진 날짜에 대한 모든 Outlook 약속 나열

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

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

로 시작하지만 난 다른 결과 때마다 얻을 내가 true로 옵션을 설정할 때조차 되풀이 약속을 볼 수 없습니다.

Delphi 7을 사용하여 주어진 날짜의 약속을 나열 할 수있는 방법이 있습니까? 코드가 인정됩니다.

감사합니다.

출처

2010-01-27 Uri