Email Lotus Notes通过OLE获取选定的邮件

我正在尝试通过OLE从LotusNotes获取选定的邮件。到目前为止，我是这样做的：

 UIView := FLNotes.CURRENTVIEW;
 UIDocuments := UIView.DOCUMENTS;

   for counter := 1 to UIDocuments.Count do begin
     if counter = 1 Then
       aDocument := UIDocuments.GETFIRSTDOCUMENT
     else
       aDocument := UIDocuments.GETNEXTDOCUMENT(aDocument);

     ProcessDokument (aDocument)

当我在这个邮件视图中时，它按预期工作，我只收到我在旁边打勾的邮件（因此我收到2封邮件） 现在我想搜索某个地方有“sem”的特定邮件，然后切换到搜索选项卡：

现在的问题是，我的代码返回所有可见文档，而不仅仅是我选择的文档。在这里，我没有选择任何一个，但我的for循环对每个文档运行7次

我的问题是，为什么所有的文档都在处理中，即使我没有选择其中的任何一个，尤其是，为什么行为与我在邮箱中时不同。有没有办法确定我选择的那些

---

关于

答案是，在全文搜索之后，您实际上不在视图中。您所处的全文搜索结果列表看起来像一个视图，但实际上它是视图顶部的一个覆盖。如果您能看到实际视图，结果列表中的文档将被选中

中没有方法可以获取您看到的当前全文搜索结果列表（也没有NotesUIFTSearchResults类来表示它），因此我认为没有任何方法可以访问您在结果列表中手动选择的文档

您可以做的是获取结果列表中所有文档的数据，构建一个对话框，并向用户显示，让用户在对话框中选择文档，而不是在结果列表中选择文档，然后让您的代码作用于用户选择的代码-但是在没有看到您的代码，也不知道它在ProcessDokument（）例程中试图做什么的情况下，我不知道这是否合理