Common/DocumentResultList: Move Context menu into ribbon

This commit is contained in:
Jonathan Jenne
2022-03-14 13:17:39 +01:00
parent 7f9fd6ee58
commit 007ddeede0
15 changed files with 621 additions and 2360 deletions

View File

@@ -111,7 +111,7 @@ Namespace DocumentResultList
End Using
End Using
Dim oProcessId = Await DoOpenFile(oFilePath)
Dim oProcessId = DoOpenFile(oFilePath)
Return New Tuple(Of Integer, String)(oProcessId, oFilePath)
@@ -124,7 +124,7 @@ Namespace DocumentResultList
Private Async Function OpenFileFromPath(pDocument As Document) As Task(Of Tuple(Of Integer, String))
Try
Dim oProcessId = Await DoOpenFile(pDocument.FullPath)
Dim oProcessId = DoOpenFile(pDocument.FullPath)
Return New Tuple(Of Integer, String)(oProcessId, pDocument.FullPath)
Catch ex As Exception
@@ -133,7 +133,7 @@ Namespace DocumentResultList
End Try
End Function
Private Async Function DoOpenFile(pFilePath As String) As Task(Of Integer)
Private Function DoOpenFile(pFilePath As String) As Integer
Dim _Process = New Process
_Process.StartInfo.FileName = pFilePath
_Process.EnableRaisingEvents = True