diff --git a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb index df461c8..0649d40 100644 --- a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb +++ b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - + diff --git a/app/DD_PM_WINDREAM/frmFormDesigner.vb b/app/DD_PM_WINDREAM/frmFormDesigner.vb index fe4eedf..3728b39 100644 --- a/app/DD_PM_WINDREAM/frmFormDesigner.vb +++ b/app/DD_PM_WINDREAM/frmFormDesigner.vb @@ -285,11 +285,6 @@ Public Class frmFormDesigner Mouse_IsPressed = True CurrentControl = Nothing - Try - TBPM_PROFILE_CONTROLSBindingSource.Clear() - Catch ex As Exception - LOGGER.Error(ex) - End Try End Sub Private Sub DragDropButtons_MouseMove(sender As Object, e As MouseEventArgs) Handles btnlabel.MouseMove, btntextbox.MouseMove, btndtp.MouseMove, btnVektor.MouseMove, btnTabelle.MouseMove, btnCheckbox.MouseMove, btnLine.MouseMove, btnButton.MouseMove diff --git a/app/DD_PM_WINDREAM/frmInvDashboard.Designer.vb b/app/DD_PM_WINDREAM/frmInvDashboard.Designer.vb index 7a1bed5..1f4350d 100644 --- a/app/DD_PM_WINDREAM/frmInvDashboard.Designer.vb +++ b/app/DD_PM_WINDREAM/frmInvDashboard.Designer.vb @@ -147,12 +147,50 @@ Partial Class frmInvDashboard Me.colAnzahl = New DevExpress.XtraGrid.Columns.TileViewColumn() Me.colNettoSumme = New DevExpress.XtraGrid.Columns.TileViewColumn() Me.CommandBarGalleryDropDown1 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components) + Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() + Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem() + Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem() + Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem() + Me.CreateBarBaseItem1 = New DevExpress.XtraCharts.UI.CreateBarBaseItem() + Me.CreateLineBaseItem1 = New DevExpress.XtraCharts.UI.CreateLineBaseItem() Me.CommandBarGalleryDropDown2 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components) + Me.CreatePieBaseItem1 = New DevExpress.XtraCharts.UI.CreatePieBaseItem() Me.CommandBarGalleryDropDown3 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components) + Me.CreateRotatedBarBaseItem1 = New DevExpress.XtraCharts.UI.CreateRotatedBarBaseItem() Me.CommandBarGalleryDropDown4 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components) + Me.CreateAreaBaseItem1 = New DevExpress.XtraCharts.UI.CreateAreaBaseItem() Me.CommandBarGalleryDropDown5 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components) + Me.CreateOtherSeriesTypesBaseItem1 = New DevExpress.XtraCharts.UI.CreateOtherSeriesTypesBaseItem() Me.CommandBarGalleryDropDown6 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components) + Me.ChangePaletteGalleryBaseItem1 = New DevExpress.XtraCharts.UI.ChangePaletteGalleryBaseItem() Me.CommandBarGalleryDropDown7 = New DevExpress.XtraBars.Commands.CommandBarGalleryDropDown(Me.components) + Me.ChangeAppearanceGalleryBaseItem1 = New DevExpress.XtraCharts.UI.ChangeAppearanceGalleryBaseItem() + Me.RunDesignerChartItem1 = New DevExpress.XtraCharts.UI.RunDesignerChartItem() + Me.SaveAsTemplateChartItem1 = New DevExpress.XtraCharts.UI.SaveAsTemplateChartItem() + Me.LoadTemplateChartItem1 = New DevExpress.XtraCharts.UI.LoadTemplateChartItem() + Me.PrintPreviewChartItem1 = New DevExpress.XtraCharts.UI.PrintPreviewChartItem() + Me.PrintChartItem1 = New DevExpress.XtraCharts.UI.PrintChartItem() + Me.CreateExportBaseItem1 = New DevExpress.XtraCharts.UI.CreateExportBaseItem() + Me.ExportToPDFChartItem1 = New DevExpress.XtraCharts.UI.ExportToPDFChartItem() + Me.ExportToHTMLChartItem1 = New DevExpress.XtraCharts.UI.ExportToHTMLChartItem() + Me.ExportToMHTChartItem1 = New DevExpress.XtraCharts.UI.ExportToMHTChartItem() + Me.ExportToXLSChartItem1 = New DevExpress.XtraCharts.UI.ExportToXLSChartItem() + Me.ExportToXLSXChartItem1 = New DevExpress.XtraCharts.UI.ExportToXLSXChartItem() + Me.ExportToRTFChartItem1 = New DevExpress.XtraCharts.UI.ExportToRTFChartItem() + Me.CreateExportToImageBaseItem1 = New DevExpress.XtraCharts.UI.CreateExportToImageBaseItem() + Me.ExportToBMPChartItem1 = New DevExpress.XtraCharts.UI.ExportToBMPChartItem() + Me.ExportToGIFChartItem1 = New DevExpress.XtraCharts.UI.ExportToGIFChartItem() + Me.ExportToJPEGChartItem1 = New DevExpress.XtraCharts.UI.ExportToJPEGChartItem() + Me.ExportToPNGChartItem1 = New DevExpress.XtraCharts.UI.ExportToPNGChartItem() + Me.ExportToTIFFChartItem1 = New DevExpress.XtraCharts.UI.ExportToTIFFChartItem() + Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem() + Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem() + Me.BarButtonItem6 = New DevExpress.XtraBars.BarButtonItem() + Me.ChartRibbonPageCategory1 = New DevExpress.XtraCharts.UI.ChartRibbonPageCategory() + Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() @@ -188,45 +226,8 @@ Partial Class frmInvDashboard Me.ChartTypeRibbonPageGroup1 = New DevExpress.XtraCharts.UI.ChartTypeRibbonPageGroup() Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl() Me.Panel2 = New System.Windows.Forms.Panel() - Me.ChartRibbonPageCategory1 = New DevExpress.XtraCharts.UI.ChartRibbonPageCategory() - Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage() - Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage() - Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() - Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() - Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem() - Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem() - Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem() - Me.CreateBarBaseItem1 = New DevExpress.XtraCharts.UI.CreateBarBaseItem() - Me.CreateLineBaseItem1 = New DevExpress.XtraCharts.UI.CreateLineBaseItem() - Me.CreatePieBaseItem1 = New DevExpress.XtraCharts.UI.CreatePieBaseItem() - Me.CreateRotatedBarBaseItem1 = New DevExpress.XtraCharts.UI.CreateRotatedBarBaseItem() - Me.CreateAreaBaseItem1 = New DevExpress.XtraCharts.UI.CreateAreaBaseItem() - Me.CreateOtherSeriesTypesBaseItem1 = New DevExpress.XtraCharts.UI.CreateOtherSeriesTypesBaseItem() - Me.ChangePaletteGalleryBaseItem1 = New DevExpress.XtraCharts.UI.ChangePaletteGalleryBaseItem() - Me.ChangeAppearanceGalleryBaseItem1 = New DevExpress.XtraCharts.UI.ChangeAppearanceGalleryBaseItem() - Me.RunDesignerChartItem1 = New DevExpress.XtraCharts.UI.RunDesignerChartItem() - Me.SaveAsTemplateChartItem1 = New DevExpress.XtraCharts.UI.SaveAsTemplateChartItem() - Me.LoadTemplateChartItem1 = New DevExpress.XtraCharts.UI.LoadTemplateChartItem() - Me.PrintPreviewChartItem1 = New DevExpress.XtraCharts.UI.PrintPreviewChartItem() - Me.PrintChartItem1 = New DevExpress.XtraCharts.UI.PrintChartItem() - Me.CreateExportBaseItem1 = New DevExpress.XtraCharts.UI.CreateExportBaseItem() - Me.ExportToPDFChartItem1 = New DevExpress.XtraCharts.UI.ExportToPDFChartItem() - Me.ExportToHTMLChartItem1 = New DevExpress.XtraCharts.UI.ExportToHTMLChartItem() - Me.ExportToMHTChartItem1 = New DevExpress.XtraCharts.UI.ExportToMHTChartItem() - Me.ExportToXLSChartItem1 = New DevExpress.XtraCharts.UI.ExportToXLSChartItem() - Me.ExportToXLSXChartItem1 = New DevExpress.XtraCharts.UI.ExportToXLSXChartItem() - Me.ExportToRTFChartItem1 = New DevExpress.XtraCharts.UI.ExportToRTFChartItem() - Me.ExportToBMPChartItem1 = New DevExpress.XtraCharts.UI.ExportToBMPChartItem() - Me.ExportToGIFChartItem1 = New DevExpress.XtraCharts.UI.ExportToGIFChartItem() - Me.ExportToJPEGChartItem1 = New DevExpress.XtraCharts.UI.ExportToJPEGChartItem() - Me.ExportToPNGChartItem1 = New DevExpress.XtraCharts.UI.ExportToPNGChartItem() - Me.ExportToTIFFChartItem1 = New DevExpress.XtraCharts.UI.ExportToTIFFChartItem() - Me.CreateExportToImageBaseItem1 = New DevExpress.XtraCharts.UI.CreateExportToImageBaseItem() - Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem() - Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem() - Me.BarButtonItem6 = New DevExpress.XtraBars.BarButtonItem() - Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() CType(Me.CommandBarGalleryDropDown1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.CommandBarGalleryDropDown2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.CommandBarGalleryDropDown3, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.CommandBarGalleryDropDown4, System.ComponentModel.ISupportInitialize).BeginInit() @@ -260,7 +261,6 @@ Partial Class frmInvDashboard CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainerControl1.SuspendLayout() Me.Panel2.SuspendLayout() - CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'colTitle @@ -446,6 +446,58 @@ Partial Class frmInvDashboard Me.CommandBarGalleryDropDown1.Name = "CommandBarGalleryDropDown1" Me.CommandBarGalleryDropDown1.Ribbon = Me.RibbonControl1 ' + 'RibbonControl1 + ' + Me.RibbonControl1.ExpandCollapseItem.Id = 0 + Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.CreateBarBaseItem1, Me.CreateLineBaseItem1, Me.CreatePieBaseItem1, Me.CreateRotatedBarBaseItem1, Me.CreateAreaBaseItem1, Me.CreateOtherSeriesTypesBaseItem1, Me.ChangePaletteGalleryBaseItem1, Me.ChangeAppearanceGalleryBaseItem1, Me.RunDesignerChartItem1, Me.SaveAsTemplateChartItem1, Me.LoadTemplateChartItem1, Me.PrintPreviewChartItem1, Me.PrintChartItem1, Me.CreateExportBaseItem1, Me.ExportToPDFChartItem1, Me.ExportToHTMLChartItem1, Me.ExportToMHTChartItem1, Me.ExportToXLSChartItem1, Me.ExportToXLSXChartItem1, Me.ExportToRTFChartItem1, Me.ExportToBMPChartItem1, Me.ExportToGIFChartItem1, Me.ExportToJPEGChartItem1, Me.ExportToPNGChartItem1, Me.ExportToTIFFChartItem1, Me.CreateExportToImageBaseItem1, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6}) + Me.RibbonControl1.Location = New System.Drawing.Point(0, 0) + Me.RibbonControl1.MaxItemId = 33 + Me.RibbonControl1.Name = "RibbonControl1" + Me.RibbonControl1.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.ChartRibbonPageCategory1}) + Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage3}) + Me.RibbonControl1.Size = New System.Drawing.Size(1124, 146) + Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 + ' + 'BarButtonItem1 + ' + Me.BarButtonItem1.Caption = "Export als PDF" + Me.BarButtonItem1.Hint = "Export den ausgewählten Chart als PDF" + Me.BarButtonItem1.Id = 1 + Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) + Me.BarButtonItem1.Name = "BarButtonItem1" + ' + 'BarButtonItem2 + ' + Me.BarButtonItem2.Caption = "Export als Bild" + Me.BarButtonItem2.Hint = "Exportiert den ausgewählten Chart als Bild" + Me.BarButtonItem2.Id = 2 + Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) + Me.BarButtonItem2.Name = "BarButtonItem2" + ' + 'BarButtonItem3 + ' + Me.BarButtonItem3.Caption = "Export Verteilung als PDF" + Me.BarButtonItem3.Hint = "Exportiert das Dashboard als PDF" + Me.BarButtonItem3.Id = 3 + Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) + Me.BarButtonItem3.Name = "BarButtonItem3" + ' + 'CreateBarBaseItem1 + ' + Me.CreateBarBaseItem1.Caption = "Spalte" + Me.CreateBarBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown1 + Me.CreateBarBaseItem1.Enabled = False + Me.CreateBarBaseItem1.Id = 4 + Me.CreateBarBaseItem1.Name = "CreateBarBaseItem1" + ' + 'CreateLineBaseItem1 + ' + Me.CreateLineBaseItem1.Caption = "Linie" + Me.CreateLineBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown2 + Me.CreateLineBaseItem1.Enabled = False + Me.CreateLineBaseItem1.Id = 5 + Me.CreateLineBaseItem1.Name = "CreateLineBaseItem1" + ' 'CommandBarGalleryDropDown2 ' ' @@ -511,6 +563,14 @@ Partial Class frmInvDashboard Me.CommandBarGalleryDropDown2.Name = "CommandBarGalleryDropDown2" Me.CommandBarGalleryDropDown2.Ribbon = Me.RibbonControl1 ' + 'CreatePieBaseItem1 + ' + Me.CreatePieBaseItem1.Caption = "Torte" + Me.CreatePieBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown3 + Me.CreatePieBaseItem1.Enabled = False + Me.CreatePieBaseItem1.Id = 6 + Me.CreatePieBaseItem1.Name = "CreatePieBaseItem1" + ' 'CommandBarGalleryDropDown3 ' ' @@ -552,6 +612,14 @@ Partial Class frmInvDashboard Me.CommandBarGalleryDropDown3.Name = "CommandBarGalleryDropDown3" Me.CommandBarGalleryDropDown3.Ribbon = Me.RibbonControl1 ' + 'CreateRotatedBarBaseItem1 + ' + Me.CreateRotatedBarBaseItem1.Caption = "Balken" + Me.CreateRotatedBarBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown4 + Me.CreateRotatedBarBaseItem1.Enabled = False + Me.CreateRotatedBarBaseItem1.Id = 7 + Me.CreateRotatedBarBaseItem1.Name = "CreateRotatedBarBaseItem1" + ' 'CommandBarGalleryDropDown4 ' ' @@ -595,6 +663,14 @@ Partial Class frmInvDashboard Me.CommandBarGalleryDropDown4.Name = "CommandBarGalleryDropDown4" Me.CommandBarGalleryDropDown4.Ribbon = Me.RibbonControl1 ' + 'CreateAreaBaseItem1 + ' + Me.CreateAreaBaseItem1.Caption = "Fläche" + Me.CreateAreaBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown5 + Me.CreateAreaBaseItem1.Enabled = False + Me.CreateAreaBaseItem1.Id = 8 + Me.CreateAreaBaseItem1.Name = "CreateAreaBaseItem1" + ' 'CommandBarGalleryDropDown5 ' ' @@ -691,6 +767,14 @@ Partial Class frmInvDashboard Me.CommandBarGalleryDropDown5.Name = "CommandBarGalleryDropDown5" Me.CommandBarGalleryDropDown5.Ribbon = Me.RibbonControl1 ' + 'CreateOtherSeriesTypesBaseItem1 + ' + Me.CreateOtherSeriesTypesBaseItem1.Caption = "Sonstiges Charts" + Me.CreateOtherSeriesTypesBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown6 + Me.CreateOtherSeriesTypesBaseItem1.Enabled = False + Me.CreateOtherSeriesTypesBaseItem1.Id = 9 + Me.CreateOtherSeriesTypesBaseItem1.Name = "CreateOtherSeriesTypesBaseItem1" + ' 'CommandBarGalleryDropDown6 ' ' @@ -814,6 +898,14 @@ Partial Class frmInvDashboard Me.CommandBarGalleryDropDown6.Name = "CommandBarGalleryDropDown6" Me.CommandBarGalleryDropDown6.Ribbon = Me.RibbonControl1 ' + 'ChangePaletteGalleryBaseItem1 + ' + Me.ChangePaletteGalleryBaseItem1.Caption = "Palette" + Me.ChangePaletteGalleryBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown7 + Me.ChangePaletteGalleryBaseItem1.Enabled = False + Me.ChangePaletteGalleryBaseItem1.Id = 10 + Me.ChangePaletteGalleryBaseItem1.Name = "ChangePaletteGalleryBaseItem1" + ' 'CommandBarGalleryDropDown7 ' ' @@ -855,6 +947,201 @@ Partial Class frmInvDashboard Me.CommandBarGalleryDropDown7.Name = "CommandBarGalleryDropDown7" Me.CommandBarGalleryDropDown7.Ribbon = Me.RibbonControl1 ' + 'ChangeAppearanceGalleryBaseItem1 + ' + Me.ChangeAppearanceGalleryBaseItem1.Enabled = False + ' + ' + ' + Me.ChangeAppearanceGalleryBaseItem1.Gallery.ColumnCount = 7 + Me.ChangeAppearanceGalleryBaseItem1.Gallery.ImageSize = New System.Drawing.Size(80, 50) + Me.ChangeAppearanceGalleryBaseItem1.Gallery.RowCount = 4 + Me.ChangeAppearanceGalleryBaseItem1.Id = 11 + Me.ChangeAppearanceGalleryBaseItem1.Name = "ChangeAppearanceGalleryBaseItem1" + ' + 'RunDesignerChartItem1 + ' + Me.RunDesignerChartItem1.Caption = "Führen Sie den Diagrammassistenten..." + Me.RunDesignerChartItem1.Enabled = False + Me.RunDesignerChartItem1.Id = 12 + Me.RunDesignerChartItem1.Name = "RunDesignerChartItem1" + ' + 'SaveAsTemplateChartItem1 + ' + Me.SaveAsTemplateChartItem1.Caption = "Als Vorlage speichern" + Me.SaveAsTemplateChartItem1.Enabled = False + Me.SaveAsTemplateChartItem1.Id = 13 + Me.SaveAsTemplateChartItem1.Name = "SaveAsTemplateChartItem1" + ' + 'LoadTemplateChartItem1 + ' + Me.LoadTemplateChartItem1.Caption = "Laden" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Vorlage" + Me.LoadTemplateChartItem1.Enabled = False + Me.LoadTemplateChartItem1.Id = 14 + Me.LoadTemplateChartItem1.Name = "LoadTemplateChartItem1" + ' + 'PrintPreviewChartItem1 + ' + Me.PrintPreviewChartItem1.Caption = "Druckvorschau" + Me.PrintPreviewChartItem1.Enabled = False + Me.PrintPreviewChartItem1.Id = 15 + Me.PrintPreviewChartItem1.Name = "PrintPreviewChartItem1" + ' + 'PrintChartItem1 + ' + Me.PrintChartItem1.Caption = "Drucken" + Me.PrintChartItem1.Enabled = False + Me.PrintChartItem1.Id = 16 + Me.PrintChartItem1.Name = "PrintChartItem1" + ' + 'CreateExportBaseItem1 + ' + Me.CreateExportBaseItem1.Caption = "Exportieren" + Me.CreateExportBaseItem1.Enabled = False + Me.CreateExportBaseItem1.Id = 17 + Me.CreateExportBaseItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToPDFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToHTMLChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToMHTChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToXLSChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToXLSXChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToRTFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.CreateExportToImageBaseItem1)}) + Me.CreateExportBaseItem1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText + Me.CreateExportBaseItem1.Name = "CreateExportBaseItem1" + Me.CreateExportBaseItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu + ' + 'ExportToPDFChartItem1 + ' + Me.ExportToPDFChartItem1.Caption = "In PDF exportieren" + Me.ExportToPDFChartItem1.Enabled = False + Me.ExportToPDFChartItem1.Id = 18 + Me.ExportToPDFChartItem1.Name = "ExportToPDFChartItem1" + ' + 'ExportToHTMLChartItem1 + ' + Me.ExportToHTMLChartItem1.Caption = "Export in HTML" + Me.ExportToHTMLChartItem1.Enabled = False + Me.ExportToHTMLChartItem1.Id = 19 + Me.ExportToHTMLChartItem1.Name = "ExportToHTMLChartItem1" + ' + 'ExportToMHTChartItem1 + ' + Me.ExportToMHTChartItem1.Caption = "Exportieren in MHT" + Me.ExportToMHTChartItem1.Enabled = False + Me.ExportToMHTChartItem1.Id = 20 + Me.ExportToMHTChartItem1.Name = "ExportToMHTChartItem1" + ' + 'ExportToXLSChartItem1 + ' + Me.ExportToXLSChartItem1.Caption = "Export in XLS" + Me.ExportToXLSChartItem1.Enabled = False + Me.ExportToXLSChartItem1.Id = 21 + Me.ExportToXLSChartItem1.Name = "ExportToXLSChartItem1" + ' + 'ExportToXLSXChartItem1 + ' + Me.ExportToXLSXChartItem1.Caption = "Exportieren in XLSX" + Me.ExportToXLSXChartItem1.Enabled = False + Me.ExportToXLSXChartItem1.Id = 22 + Me.ExportToXLSXChartItem1.Name = "ExportToXLSXChartItem1" + ' + 'ExportToRTFChartItem1 + ' + Me.ExportToRTFChartItem1.Caption = "Export in RTF" + Me.ExportToRTFChartItem1.Enabled = False + Me.ExportToRTFChartItem1.Id = 23 + Me.ExportToRTFChartItem1.Name = "ExportToRTFChartItem1" + ' + 'CreateExportToImageBaseItem1 + ' + Me.CreateExportToImageBaseItem1.Caption = "Bild exportieren" + Me.CreateExportToImageBaseItem1.Enabled = False + Me.CreateExportToImageBaseItem1.Id = 29 + Me.CreateExportToImageBaseItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToBMPChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToGIFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToJPEGChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToPNGChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToTIFFChartItem1)}) + Me.CreateExportToImageBaseItem1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText + Me.CreateExportToImageBaseItem1.Name = "CreateExportToImageBaseItem1" + ' + 'ExportToBMPChartItem1 + ' + Me.ExportToBMPChartItem1.Caption = "BMP" + Me.ExportToBMPChartItem1.Enabled = False + Me.ExportToBMPChartItem1.Id = 24 + Me.ExportToBMPChartItem1.Name = "ExportToBMPChartItem1" + ' + 'ExportToGIFChartItem1 + ' + Me.ExportToGIFChartItem1.Caption = "GIF" + Me.ExportToGIFChartItem1.Enabled = False + Me.ExportToGIFChartItem1.Id = 25 + Me.ExportToGIFChartItem1.Name = "ExportToGIFChartItem1" + ' + 'ExportToJPEGChartItem1 + ' + Me.ExportToJPEGChartItem1.Caption = "JPEG" + Me.ExportToJPEGChartItem1.Enabled = False + Me.ExportToJPEGChartItem1.Id = 26 + Me.ExportToJPEGChartItem1.Name = "ExportToJPEGChartItem1" + ' + 'ExportToPNGChartItem1 + ' + Me.ExportToPNGChartItem1.Caption = "PNG" + Me.ExportToPNGChartItem1.Enabled = False + Me.ExportToPNGChartItem1.Id = 27 + Me.ExportToPNGChartItem1.Name = "ExportToPNGChartItem1" + ' + 'ExportToTIFFChartItem1 + ' + Me.ExportToTIFFChartItem1.Caption = "TIFF" + Me.ExportToTIFFChartItem1.Enabled = False + Me.ExportToTIFFChartItem1.Id = 28 + Me.ExportToTIFFChartItem1.Name = "ExportToTIFFChartItem1" + ' + 'BarButtonItem4 + ' + Me.BarButtonItem4.Caption = "Export Top Kreditoren als xlsx" + Me.BarButtonItem4.Id = 30 + Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image) + Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image) + Me.BarButtonItem4.Name = "BarButtonItem4" + ' + 'BarButtonItem5 + ' + Me.BarButtonItem5.Caption = "Export Top Kreditoren als pdf" + Me.BarButtonItem5.Id = 31 + Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) + Me.BarButtonItem5.Name = "BarButtonItem5" + ' + 'BarButtonItem6 + ' + Me.BarButtonItem6.Caption = "BarButtonItem6" + Me.BarButtonItem6.Id = 32 + Me.BarButtonItem6.Name = "BarButtonItem6" + ' + 'ChartRibbonPageCategory1 + ' + Me.ChartRibbonPageCategory1.Control = Nothing + Me.ChartRibbonPageCategory1.Name = "ChartRibbonPageCategory1" + ' + 'RibbonPage1 + ' + Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2}) + Me.RibbonPage1.Name = "RibbonPage1" + Me.RibbonPage1.Text = "Funktionen" + ' + 'RibbonPageGroup1 + ' + Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1) + Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2) + Me.RibbonPageGroup1.Name = "RibbonPageGroup1" + Me.RibbonPageGroup1.Text = "Funktionen - Charts" + ' + 'RibbonPageGroup2 + ' + Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem3) + Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem4) + Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem5) + Me.RibbonPageGroup2.Name = "RibbonPageGroup2" + Me.RibbonPageGroup2.Text = "Dashboard" + ' + 'RibbonPage3 + ' + Me.RibbonPage3.Name = "RibbonPage3" + Me.RibbonPage3.Text = "RibbonPage3" + ' 'RibbonStatusBar1 ' Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 745) @@ -1214,293 +1501,6 @@ Partial Class frmInvDashboard Me.Panel2.Size = New System.Drawing.Size(1124, 135) Me.Panel2.TabIndex = 12 ' - 'ChartRibbonPageCategory1 - ' - Me.ChartRibbonPageCategory1.Control = Nothing - Me.ChartRibbonPageCategory1.Name = "ChartRibbonPageCategory1" - ' - 'RibbonPage3 - ' - Me.RibbonPage3.Name = "RibbonPage3" - Me.RibbonPage3.Text = "RibbonPage3" - ' - 'RibbonPage1 - ' - Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2}) - Me.RibbonPage1.Name = "RibbonPage1" - Me.RibbonPage1.Text = "Funktionen" - ' - 'RibbonPageGroup2 - ' - Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem3) - Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem4) - Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem5) - Me.RibbonPageGroup2.Name = "RibbonPageGroup2" - Me.RibbonPageGroup2.Text = "Dashboard" - ' - 'RibbonPageGroup1 - ' - Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1) - Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2) - Me.RibbonPageGroup1.Name = "RibbonPageGroup1" - Me.RibbonPageGroup1.Text = "Funktionen - Charts" - ' - 'BarButtonItem1 - ' - Me.BarButtonItem1.Caption = "Export als PDF" - Me.BarButtonItem1.Hint = "Export den ausgewählten Chart als PDF" - Me.BarButtonItem1.Id = 1 - Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) - Me.BarButtonItem1.Name = "BarButtonItem1" - ' - 'BarButtonItem2 - ' - Me.BarButtonItem2.Caption = "Export als Bild" - Me.BarButtonItem2.Hint = "Exportiert den ausgewählten Chart als Bild" - Me.BarButtonItem2.Id = 2 - Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) - Me.BarButtonItem2.Name = "BarButtonItem2" - ' - 'BarButtonItem3 - ' - Me.BarButtonItem3.Caption = "Export Verteilung als PDF" - Me.BarButtonItem3.Hint = "Exportiert das Dashboard als PDF" - Me.BarButtonItem3.Id = 3 - Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) - Me.BarButtonItem3.Name = "BarButtonItem3" - ' - 'CreateBarBaseItem1 - ' - Me.CreateBarBaseItem1.Caption = "Spalte" - Me.CreateBarBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown1 - Me.CreateBarBaseItem1.Enabled = False - Me.CreateBarBaseItem1.Id = 4 - Me.CreateBarBaseItem1.Name = "CreateBarBaseItem1" - ' - 'CreateLineBaseItem1 - ' - Me.CreateLineBaseItem1.Caption = "Linie" - Me.CreateLineBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown2 - Me.CreateLineBaseItem1.Enabled = False - Me.CreateLineBaseItem1.Id = 5 - Me.CreateLineBaseItem1.Name = "CreateLineBaseItem1" - ' - 'CreatePieBaseItem1 - ' - Me.CreatePieBaseItem1.Caption = "Torte" - Me.CreatePieBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown3 - Me.CreatePieBaseItem1.Enabled = False - Me.CreatePieBaseItem1.Id = 6 - Me.CreatePieBaseItem1.Name = "CreatePieBaseItem1" - ' - 'CreateRotatedBarBaseItem1 - ' - Me.CreateRotatedBarBaseItem1.Caption = "Balken" - Me.CreateRotatedBarBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown4 - Me.CreateRotatedBarBaseItem1.Enabled = False - Me.CreateRotatedBarBaseItem1.Id = 7 - Me.CreateRotatedBarBaseItem1.Name = "CreateRotatedBarBaseItem1" - ' - 'CreateAreaBaseItem1 - ' - Me.CreateAreaBaseItem1.Caption = "Fläche" - Me.CreateAreaBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown5 - Me.CreateAreaBaseItem1.Enabled = False - Me.CreateAreaBaseItem1.Id = 8 - Me.CreateAreaBaseItem1.Name = "CreateAreaBaseItem1" - ' - 'CreateOtherSeriesTypesBaseItem1 - ' - Me.CreateOtherSeriesTypesBaseItem1.Caption = "Sonstiges Charts" - Me.CreateOtherSeriesTypesBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown6 - Me.CreateOtherSeriesTypesBaseItem1.Enabled = False - Me.CreateOtherSeriesTypesBaseItem1.Id = 9 - Me.CreateOtherSeriesTypesBaseItem1.Name = "CreateOtherSeriesTypesBaseItem1" - ' - 'ChangePaletteGalleryBaseItem1 - ' - Me.ChangePaletteGalleryBaseItem1.Caption = "Palette" - Me.ChangePaletteGalleryBaseItem1.DropDownControl = Me.CommandBarGalleryDropDown7 - Me.ChangePaletteGalleryBaseItem1.Enabled = False - Me.ChangePaletteGalleryBaseItem1.Id = 10 - Me.ChangePaletteGalleryBaseItem1.Name = "ChangePaletteGalleryBaseItem1" - ' - 'ChangeAppearanceGalleryBaseItem1 - ' - Me.ChangeAppearanceGalleryBaseItem1.Enabled = False - ' - ' - ' - Me.ChangeAppearanceGalleryBaseItem1.Gallery.ColumnCount = 7 - Me.ChangeAppearanceGalleryBaseItem1.Gallery.ImageSize = New System.Drawing.Size(80, 50) - Me.ChangeAppearanceGalleryBaseItem1.Gallery.RowCount = 4 - Me.ChangeAppearanceGalleryBaseItem1.Id = 11 - Me.ChangeAppearanceGalleryBaseItem1.Name = "ChangeAppearanceGalleryBaseItem1" - ' - 'RunDesignerChartItem1 - ' - Me.RunDesignerChartItem1.Caption = "Führen Sie den Diagrammassistenten..." - Me.RunDesignerChartItem1.Enabled = False - Me.RunDesignerChartItem1.Id = 12 - Me.RunDesignerChartItem1.Name = "RunDesignerChartItem1" - ' - 'SaveAsTemplateChartItem1 - ' - Me.SaveAsTemplateChartItem1.Caption = "Als Vorlage speichern" - Me.SaveAsTemplateChartItem1.Enabled = False - Me.SaveAsTemplateChartItem1.Id = 13 - Me.SaveAsTemplateChartItem1.Name = "SaveAsTemplateChartItem1" - ' - 'LoadTemplateChartItem1 - ' - Me.LoadTemplateChartItem1.Caption = "Laden" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Vorlage" - Me.LoadTemplateChartItem1.Enabled = False - Me.LoadTemplateChartItem1.Id = 14 - Me.LoadTemplateChartItem1.Name = "LoadTemplateChartItem1" - ' - 'PrintPreviewChartItem1 - ' - Me.PrintPreviewChartItem1.Caption = "Druckvorschau" - Me.PrintPreviewChartItem1.Enabled = False - Me.PrintPreviewChartItem1.Id = 15 - Me.PrintPreviewChartItem1.Name = "PrintPreviewChartItem1" - ' - 'PrintChartItem1 - ' - Me.PrintChartItem1.Caption = "Drucken" - Me.PrintChartItem1.Enabled = False - Me.PrintChartItem1.Id = 16 - Me.PrintChartItem1.Name = "PrintChartItem1" - ' - 'CreateExportBaseItem1 - ' - Me.CreateExportBaseItem1.Caption = "Exportieren" - Me.CreateExportBaseItem1.Enabled = False - Me.CreateExportBaseItem1.Id = 17 - Me.CreateExportBaseItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToPDFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToHTMLChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToMHTChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToXLSChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToXLSXChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToRTFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.CreateExportToImageBaseItem1)}) - Me.CreateExportBaseItem1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText - Me.CreateExportBaseItem1.Name = "CreateExportBaseItem1" - Me.CreateExportBaseItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu - ' - 'ExportToPDFChartItem1 - ' - Me.ExportToPDFChartItem1.Caption = "In PDF exportieren" - Me.ExportToPDFChartItem1.Enabled = False - Me.ExportToPDFChartItem1.Id = 18 - Me.ExportToPDFChartItem1.Name = "ExportToPDFChartItem1" - ' - 'ExportToHTMLChartItem1 - ' - Me.ExportToHTMLChartItem1.Caption = "Export in HTML" - Me.ExportToHTMLChartItem1.Enabled = False - Me.ExportToHTMLChartItem1.Id = 19 - Me.ExportToHTMLChartItem1.Name = "ExportToHTMLChartItem1" - ' - 'ExportToMHTChartItem1 - ' - Me.ExportToMHTChartItem1.Caption = "Exportieren in MHT" - Me.ExportToMHTChartItem1.Enabled = False - Me.ExportToMHTChartItem1.Id = 20 - Me.ExportToMHTChartItem1.Name = "ExportToMHTChartItem1" - ' - 'ExportToXLSChartItem1 - ' - Me.ExportToXLSChartItem1.Caption = "Export in XLS" - Me.ExportToXLSChartItem1.Enabled = False - Me.ExportToXLSChartItem1.Id = 21 - Me.ExportToXLSChartItem1.Name = "ExportToXLSChartItem1" - ' - 'ExportToXLSXChartItem1 - ' - Me.ExportToXLSXChartItem1.Caption = "Exportieren in XLSX" - Me.ExportToXLSXChartItem1.Enabled = False - Me.ExportToXLSXChartItem1.Id = 22 - Me.ExportToXLSXChartItem1.Name = "ExportToXLSXChartItem1" - ' - 'ExportToRTFChartItem1 - ' - Me.ExportToRTFChartItem1.Caption = "Export in RTF" - Me.ExportToRTFChartItem1.Enabled = False - Me.ExportToRTFChartItem1.Id = 23 - Me.ExportToRTFChartItem1.Name = "ExportToRTFChartItem1" - ' - 'ExportToBMPChartItem1 - ' - Me.ExportToBMPChartItem1.Caption = "BMP" - Me.ExportToBMPChartItem1.Enabled = False - Me.ExportToBMPChartItem1.Id = 24 - Me.ExportToBMPChartItem1.Name = "ExportToBMPChartItem1" - ' - 'ExportToGIFChartItem1 - ' - Me.ExportToGIFChartItem1.Caption = "GIF" - Me.ExportToGIFChartItem1.Enabled = False - Me.ExportToGIFChartItem1.Id = 25 - Me.ExportToGIFChartItem1.Name = "ExportToGIFChartItem1" - ' - 'ExportToJPEGChartItem1 - ' - Me.ExportToJPEGChartItem1.Caption = "JPEG" - Me.ExportToJPEGChartItem1.Enabled = False - Me.ExportToJPEGChartItem1.Id = 26 - Me.ExportToJPEGChartItem1.Name = "ExportToJPEGChartItem1" - ' - 'ExportToPNGChartItem1 - ' - Me.ExportToPNGChartItem1.Caption = "PNG" - Me.ExportToPNGChartItem1.Enabled = False - Me.ExportToPNGChartItem1.Id = 27 - Me.ExportToPNGChartItem1.Name = "ExportToPNGChartItem1" - ' - 'ExportToTIFFChartItem1 - ' - Me.ExportToTIFFChartItem1.Caption = "TIFF" - Me.ExportToTIFFChartItem1.Enabled = False - Me.ExportToTIFFChartItem1.Id = 28 - Me.ExportToTIFFChartItem1.Name = "ExportToTIFFChartItem1" - ' - 'CreateExportToImageBaseItem1 - ' - Me.CreateExportToImageBaseItem1.Caption = "Bild exportieren" - Me.CreateExportToImageBaseItem1.Enabled = False - Me.CreateExportToImageBaseItem1.Id = 29 - Me.CreateExportToImageBaseItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToBMPChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToGIFChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToJPEGChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToPNGChartItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.ExportToTIFFChartItem1)}) - Me.CreateExportToImageBaseItem1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText - Me.CreateExportToImageBaseItem1.Name = "CreateExportToImageBaseItem1" - ' - 'BarButtonItem4 - ' - Me.BarButtonItem4.Caption = "Export Top Kreditoren als xlsx" - Me.BarButtonItem4.Id = 30 - Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image) - Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image) - Me.BarButtonItem4.Name = "BarButtonItem4" - ' - 'BarButtonItem5 - ' - Me.BarButtonItem5.Caption = "Export Top Kreditoren als pdf" - Me.BarButtonItem5.Id = 31 - Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) - Me.BarButtonItem5.Name = "BarButtonItem5" - ' - 'BarButtonItem6 - ' - Me.BarButtonItem6.Caption = "BarButtonItem6" - Me.BarButtonItem6.Id = 32 - Me.BarButtonItem6.Name = "BarButtonItem6" - ' - 'RibbonControl1 - ' - Me.RibbonControl1.ExpandCollapseItem.Id = 0 - Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.CreateBarBaseItem1, Me.CreateLineBaseItem1, Me.CreatePieBaseItem1, Me.CreateRotatedBarBaseItem1, Me.CreateAreaBaseItem1, Me.CreateOtherSeriesTypesBaseItem1, Me.ChangePaletteGalleryBaseItem1, Me.ChangeAppearanceGalleryBaseItem1, Me.RunDesignerChartItem1, Me.SaveAsTemplateChartItem1, Me.LoadTemplateChartItem1, Me.PrintPreviewChartItem1, Me.PrintChartItem1, Me.CreateExportBaseItem1, Me.ExportToPDFChartItem1, Me.ExportToHTMLChartItem1, Me.ExportToMHTChartItem1, Me.ExportToXLSChartItem1, Me.ExportToXLSXChartItem1, Me.ExportToRTFChartItem1, Me.ExportToBMPChartItem1, Me.ExportToGIFChartItem1, Me.ExportToJPEGChartItem1, Me.ExportToPNGChartItem1, Me.ExportToTIFFChartItem1, Me.CreateExportToImageBaseItem1, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6}) - Me.RibbonControl1.Location = New System.Drawing.Point(0, 0) - Me.RibbonControl1.MaxItemId = 33 - Me.RibbonControl1.Name = "RibbonControl1" - Me.RibbonControl1.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.ChartRibbonPageCategory1}) - Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage3}) - Me.RibbonControl1.Size = New System.Drawing.Size(1124, 146) - Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 - ' 'frmInvDashboard ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -1514,6 +1514,7 @@ Partial Class frmInvDashboard Me.StatusBar = Me.RibbonStatusBar1 Me.Text = "Invoice Dashboard" CType(Me.CommandBarGalleryDropDown1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.CommandBarGalleryDropDown2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.CommandBarGalleryDropDown3, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.CommandBarGalleryDropDown4, System.ComponentModel.ISupportInitialize).EndInit() @@ -1548,7 +1549,6 @@ Partial Class frmInvDashboard Me.SplitContainerControl1.ResumeLayout(False) Me.Panel2.ResumeLayout(False) Me.Panel2.PerformLayout() - CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() diff --git a/app/DD_PM_WINDREAM/frmInvDashboard.vb b/app/DD_PM_WINDREAM/frmInvDashboard.vb index 1067405..dfcd5ba 100644 --- a/app/DD_PM_WINDREAM/frmInvDashboard.vb +++ b/app/DD_PM_WINDREAM/frmInvDashboard.vb @@ -37,7 +37,7 @@ Public Class frmInvDashboard Else SplitContainerDashboard.Visible = False RibbonPageGroup1.Visible = False - SplitContainerControl1.Collapsed = True + SplitContainerControl1.Collapsed = False LOGGER.Debug($"ChartCreating...No chart-Configuration!! BASEDATA_DT_CHARTS = 0") Exit Sub End If @@ -298,6 +298,9 @@ Public Class frmInvDashboard Private Sub GridControl1_Click(sender As Object, e As EventArgs) Handles GridControl1.Click RibbonPageGroup1.Enabled = False RibbonPageGroup2.Enabled = True + BarButtonItem3.Enabled = True + BarButtonItem4.Enabled = False + BarButtonItem5.Enabled = False End Sub Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick @@ -320,4 +323,12 @@ Public Class frmInvDashboard GridView1.ExportToPdf(SaveFileDialog1.FileName) End If End Sub + + Private Sub GridControl2_Click(sender As Object, e As EventArgs) Handles GridControl2.Click + RibbonPageGroup1.Enabled = False + RibbonPageGroup2.Enabled = True + BarButtonItem3.Enabled = False + BarButtonItem4.Enabled = True + BarButtonItem5.Enabled = True + End Sub End Class \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmValidator.vb b/app/DD_PM_WINDREAM/frmValidator.vb index bbcb749..59a0d3d 100644 --- a/app/DD_PM_WINDREAM/frmValidator.vb +++ b/app/DD_PM_WINDREAM/frmValidator.vb @@ -1837,11 +1837,15 @@ Public Class frmValidator End Function Sub Load_IDB_DOC_DATA() - Dim oSQl As String = IDB_DOC_DATA_SQL - oSQl = oSQl.Replace("@DOC_GUID", CURRENT_DOC_GUID) - oSQl = oSQl.Replace("@DOC_ID", CURRENT_DOC_ID) - oSQl = oSQl.Replace("@DocID", CURRENT_DOC_ID) - IDB_DT_DOC_DATA = ClassDatabase.Return_Datatable(oSQl) + Try + Dim oSQl As String = IDB_DOC_DATA_SQL + oSQl = oSQl.Replace("@DOC_GUID", CURRENT_DOC_GUID) + oSQl = oSQl.Replace("@DOC_ID", CURRENT_DOC_ID) + oSQl = oSQl.Replace("@DocID", CURRENT_DOC_ID) + IDB_DT_DOC_DATA = ClassDatabase.Return_Datatable(oSQl) + Catch ex As Exception + LOGGER.Error(ex) + End Try End Sub @@ -3860,7 +3864,9 @@ Public Class frmValidator End Sub Sub Reload_Controls(SingleAttribute As String) - Load_IDB_DOC_DATA() + If IDB_ACTIVE = True Then + Load_IDB_DOC_DATA() + End If FillIndexValues(False) End Sub