splash screen

This commit is contained in:
Jonathan Jenne
2023-12-14 14:52:19 +01:00
parent d8742332ec
commit eea1bd2177
13 changed files with 657 additions and 107 deletions

View File

@@ -149,12 +149,14 @@ Public Class EnvelopeEditorController
End Try
End Function
Public Function CreateDocument(pDocumentFilePath As String) As EnvelopeDocument
Public Async Function CreateDocument(pDocumentFilePath As String) As Threading.Tasks.Task(Of EnvelopeDocument)
Try
Dim oFileInfo = New FileInfo(pDocumentFilePath)
Dim oTempFiles As New TempFiles(State.LogConfig)
Dim oTempFilePath = Path.Combine(oTempFiles.TempPath, Guid.NewGuid().ToString + oFileInfo.Extension)
File.Copy(oFileInfo.FullName, oTempFilePath, True)
Await Helpers.CopyFileAsync(oFileInfo.FullName, oTempFilePath)
'File.Copy(oFileInfo.FullName, oTempFilePath, True)
Dim oFileInfoTemp = New FileInfo(oTempFilePath)