Add clipboard handler to monitor and invoice dashboard
This commit is contained in:
parent
9b251623dc
commit
6a1b6580e4
@ -2,11 +2,18 @@
|
||||
Imports System.IO
|
||||
Imports DevExpress.XtraCharts
|
||||
Imports DevExpress.XtraGrid.Views.Tile
|
||||
Imports DigitalData.GUIs.Common
|
||||
|
||||
Public Class frmInvDashboard
|
||||
Private _selectedChart As ChartControl
|
||||
Private Sub frmInvDashboard_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
Try
|
||||
Dim oGridBuilder As New GridBuilder(GridView1)
|
||||
oGridBuilder.
|
||||
WithDefaults().
|
||||
WithReadOnlyOptions().
|
||||
WithClipboardHandler()
|
||||
|
||||
Try
|
||||
VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter.Connection.ConnectionString = CONNECTION_STRING_ECM
|
||||
Me.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter.Fill(Me.DD_DMSLiteDataSet.VWPM_CHART_INVOICE_MONITOR_SERIES)
|
||||
|
||||
@ -2,7 +2,9 @@
|
||||
Imports System.IO
|
||||
Imports DevExpress.Utils
|
||||
Imports DevExpress.XtraGrid
|
||||
Imports DevExpress.XtraGrid.Views.Grid
|
||||
Imports DevExpress.XtraPrinting
|
||||
Imports DigitalData.GUIs.Common
|
||||
|
||||
Public Class frmMonitor
|
||||
Dim DT_MONITOR_KONFIG As DataTable
|
||||
@ -13,6 +15,8 @@ Public Class frmMonitor
|
||||
Dim GRID3_SQL As String
|
||||
Dim GRID4_TITLE As String
|
||||
Dim GRID4_SQL As String
|
||||
|
||||
Private _GridBuilder As GridBuilder
|
||||
Private _ActiveGrid As GridControl = Nothing
|
||||
' Private _frmDocView As frmDocView 'You need a reference to Form1
|
||||
Dim FormShown As Boolean = False
|
||||
@ -152,6 +156,16 @@ Public Class frmMonitor
|
||||
Private Async Sub frmMonitor_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
SplitContainerControlMain.Collapsed = True
|
||||
|
||||
Dim _GridList As New List(Of GridView) From {
|
||||
GridView1,
|
||||
GridView2,
|
||||
GridView3,
|
||||
GridView4
|
||||
}
|
||||
_GridBuilder = New GridBuilder(_GridList).
|
||||
WithReadOnlyOptions().
|
||||
WithClipboardHandler()
|
||||
|
||||
GridView1.ShowLoadingPanel()
|
||||
Await Load_Grid_Data()
|
||||
GridView1.HideLoadingPanel()
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user