Über Mapi senden - Konto/Profil auswählen

[baumina]

Vielleicht hilft der Ansatz hier weiter, zumindest kam ich so auf einen anderen Kalender als der, der Standard war:

Delphi-Quellcode:

var
  myRecipient,outlook, NameSpace : OleVariant;

begin
  try
    Outlook := CreateOleObject('Outlook.Application');
  except
    MessageDlg('Outlook konnte nicht initialisiert werden.', mtError, [mbOK], 0);
    Exit;
  end;

  try
    NameSpace := Outlook.GetNameSpace('MAPI');
  except
    MessageDlg('MAPI für Outlook konnte nicht initialisiert werden.', mtError, [mbOK], 0);
    Outlook := Unassigned;
    Exit;
  end;

  myRecipient := NameSpace.CreateRecipient('[e-mail]'); 
  ...

dann weiter mit "NameSpace.GetSharedDefaultFolder(...." (glaub das geht aber nicht für alles) zumindest kannst im MSDN gut nachlesen.


EDIT : Achso, sry hab jetzt erst gelesen, dass Du nicht über Outlook gehst, also passt das wohl nicht.