Ich versuche gerade die Outlook Kategorien aufzulisten usw. siehe Titel
Ich kann die Besteheneden Kategorien auch z.B. einem Termin zuweisen, eine neue Kategorie anlegen inklusive Farbe.
Was ich nicht kann ist überprüfen ob es eine Kategorie schon gibt bevor ich sie anlege (Habe einen C#-Code gefunden, kann ihn aber nicht in Delphi übersetzen).
C#-Quelltext
1: 2: 3: 4: 5: 6:
| myNamespace = outLookApp.GetNamespace("MAPI"); if (myNamespace.Categories["liveMeeting"] == null) { myNamespace.Categories.Add("liveMeeting", OlCategoryColor.olCategoryColorDarkRed, OlCategoryShortcutKey.olCategoryShortcutKeyNone); } newEvent.Categories = "liveMeeting"; |
Mein Code
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
| Outlook := CreateOLEObject('Outlook.Application'); NameSpace := Outlook.GetNameSpace('MAPI');
memLog.Lines.Add(DateTimeToStr(Now) + ': GetDefaultFolder'); Ordner := NameSpace.GetDefaultFolder(olFolderCalendar);
if NameSpace.Categories['Bla'] = '' then begin NameSpace.Categories.Add('Bla', 15); end; |
Fehler: Unzulässige Parameteranzahl
EDIT1: Hate mein Thema noch nicht fertiggeschrieben
EDIT2: ich arbeite mit Delhpi 5