This commit is contained in:
Jonathan Jenne
2023-04-13 16:47:52 +02:00
parent e873113d8a
commit 4c783fbbcb
9 changed files with 110 additions and 54 deletions

View File

@@ -330,10 +330,38 @@
<WCFMetadata Include="Connected Services\" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\Controls.ChatAddUser\ChatAddUser.vbproj">
<Project>{f0a807cc-be14-4b5b-9200-27c16156bd8a}</Project>
<Name>ChatAddUser</Name>
</ProjectReference>
<ProjectReference Include="..\Controls.ChatControl\ChatControl.vbproj">
<Project>{1f278760-4f6b-42e8-b82d-01d4c8618340}</Project>
<Name>ChatControl</Name>
</ProjectReference>
<ProjectReference Include="..\Controls.ChatNewConv\ChatNewConv.vbproj">
<Project>{86d27ffa-480f-481d-8d23-26deae92fe6c}</Project>
<Name>ChatNewConv</Name>
</ProjectReference>
<ProjectReference Include="..\Controls.DocumentViewer\DocumentViewer.vbproj">
<Project>{0958cddf-4a16-41f6-8837-8335f71d599c}</Project>
<Name>DocumentViewer</Name>
</ProjectReference>
<ProjectReference Include="..\Controls.LookupGrid\LookupControl.vbproj">
<Project>{3dcd6d1a-c830-4241-b7e4-27430e7ea483}</Project>
<Name>LookupControl</Name>
</ProjectReference>
<ProjectReference Include="..\GUIs.Common\Common.vbproj">
<Project>{d20a6bf2-c7c6-4a7a-b34d-fa27d775a049}</Project>
<Name>Common</Name>
</ProjectReference>
<ProjectReference Include="..\Service.EDMIService\EDMIService.vbproj">
<Project>{a8c3f298-76ab-4359-ab3c-986e313b4336}</Project>
<Name>EDMIService</Name>
</ProjectReference>
<ProjectReference Include="..\Services.ZUGFeRDService\DDZUGFeRDService.vbproj">
<Project>{7deec36e-ea5f-4711-ad1e-fd8894f4ad77}</Project>
<Name>DDZUGFeRDService</Name>
</ProjectReference>
</ItemGroup>
<ItemGroup>
<None Include="Resources\alignhorizontalbottom.svg" />

View File

@@ -4,9 +4,15 @@ Public Class frmDocView
Private LogConfig As LogConfig
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
DocumentViewer1.LoadFile(OpenFileDialog1.FileName)
If String.IsNullOrEmpty(TextBox1.Text) Then
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
TextBox1.Text = OpenFileDialog1.FileName
DocumentViewer1.LoadFile(TextBox1.Text)
End If
Else
DocumentViewer1.LoadFile(TextBox1.Text)
End If
End Sub
Private Sub frmDocView_Load(sender As Object, e As EventArgs) Handles Me.Load

View File

@@ -1,5 +1,4 @@
Imports DigitalData.GUIs.Common
Imports DigitalData.GUIs.Common.Base
Imports DigitalData.Modules.Database
Imports DigitalData.Modules.Logging