AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Unterstützte Dateiformate werden nun von GDPicture angezeigt. Nicht unterstützte (.Csv) von einem geeigneten Viewer. - DocumentViewer

Browse Source
This commit is contained in:
OlgunR 2025-06-02 15:27:36 +02:00
parent f4f494adb5
commit c0b5ae741d
2 changed files with 5 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
Controls.DocumentViewer/DocumentViewer.vb
View File

@ -461,11 +461,7 @@ Public Class DocumentViewer
Private Sub SetViewerMode(Extension As String) Private Sub SetViewerMode(Extension As String)
Select Case Extension.ToUpper Select Case Extension.ToUpper
Case ".MSG" Case "CSV"
_ViewerMode = ViewerMode.RichText
Case ".EML", ".DOC", ".DOCX", ".ODT", ".RTF", ".TXT"
_ViewerMode = ViewerMode.RichText
Case ".XLSX", ".XLS", "CSV"
_ViewerMode = ViewerMode.Excel _ViewerMode = ViewerMode.Excel
Case Else Case Else
_ViewerMode = ViewerMode.GDPicture _ViewerMode = ViewerMode.GDPicture
@ -509,18 +505,7 @@ Public Class DocumentViewer
SpreadsheetControl1.Dock = DockStyle.None SpreadsheetControl1.Dock = DockStyle.None
Select Case oExtension.ToUpper Select Case oExtension.ToUpper
Case ".MSG" Case ".CSV"
Dim oEmlPath As String = _email.Convert_ToEml(FilePath)
_TempFiles.Add(oEmlPath)
DoLoadFile(oEmlPath)
Case ".EML", ".DOC", ".DOCX", ".ODT", ".RTF", ".TXT"
RichEditControl1.LoadDocument(FilePath, GetDocumentFormat(oExtension))
RichEditControl1.Visible = True
RichEditControl1.Dock = DockStyle.Fill
Case ".XLSX", ".XLS", ".CSV"
Dim oFormat = GetSpreadsheetFormat(oExtension) Dim oFormat = GetSpreadsheetFormat(oExtension)
SpreadsheetControl1.LoadDocument(FilePath, oFormat) SpreadsheetControl1.LoadDocument(FilePath, oFormat)

4
GUIs.Test.TestGUI/TestGUI.vbproj
View File

@ -377,7 +377,9 @@
<Compile Include="frmRelations.Designer.vb"> <Compile Include="frmRelations.Designer.vb">
<DependentUpon>frmRelations.vb</DependentUpon> <DependentUpon>frmRelations.vb</DependentUpon>
</Compile> </Compile>
<Compile Include="frmRelations.vb" /> <Compile Include="frmRelations.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmStart.Designer.vb"> <Compile Include="frmStart.Designer.vb">
<DependentUpon>frmStart.vb</DependentUpon> <DependentUpon>frmStart.vb</DependentUpon>
</Compile> </Compile>