So, hab mir nochmal Gedanken gemacht und prüfe nun wie folgt. Das dürfte ziemlich sicher sein, falls jemand eine
API-Funktion hat, die das sicherer macht, immer her damit. Nun aber zu meinem Ergebnis:
Delphi-Quellcode:
//erst prüfen, ob etwas in Outlook markiert ist
if(Selection.Count>0) then
//einfacher Test, ich weiss das Outlook eine Headerzeile + 1 Zeile pro Email ausgibt
if(Selection.count=(WordCount5A(pData,#13)-1)) then
//ist die Betreffzeile der ersten Email in pData vorhanden?
if(pos(Selection.Item[1].Subject,pData)>0) then
Memo1.Text := IntToStr(WordCount5A(pData,#13)-1)+' Emails';
Selection ist eine Olevariant-Variable, welche das folgende Ergebnis hält: Outlook.Application.ActiveExplorer.Selection.
WordCount5A ist eine Methode, die die Anzahl von Vorkommnissen eines Chars in einem String ermittelt.
pData enthält die DropData als Text.
Wenn man noch sicherer gehen will, könnte man testen, ob von allen markierten Emails der Betreff in pData vorhanden ist, das würde aber den Rahmen sprengen, finde ich, und deshalb belasse ich es so, bis mir was besseres daherkommt.
Gruß und Dank
Benjamin