From efe51992585fcbc2f7994bcd53701cbfbb1e8c2d Mon Sep 17 00:00:00 2001 From: Demetrio Cassarino Date: Fri, 15 Sep 2023 16:38:26 +0200 Subject: [PATCH] nuovi parametri datagrid --- MachinePanel/MyMachinePanelVM.vb | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) diff --git a/MachinePanel/MyMachinePanelVM.vb b/MachinePanel/MyMachinePanelVM.vb index b65034f..fb7fcd9 100644 --- a/MachinePanel/MyMachinePanelVM.vb +++ b/MachinePanel/MyMachinePanelVM.vb @@ -156,6 +156,7 @@ Public Class MyMachinePanelVM ' Collegata allo stile della GroupBox MachDbWindowVM.MyBorderGrbThickness = 0.25 MachDbWindowVM.MyForegroundGrbColor = Brushes.White + ' Definisco lo stile della pagina MachDbWindowVM.BorderBrushIsMouseOver = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush) MachDbWindowVM.GeneralBorderBrush = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush) @@ -184,6 +185,23 @@ Public Class MyMachinePanelVM MachDbWindowVM.BorderThicknessIsChecked = 1.0 MachDbWindowVM.OpacityIsChecked = 0.25 + 'Definisco lo stile della DataGrid + MachDbWindowVM.HeaderVisibility = DataGridHeadersVisibility.Column + MachDbWindowVM.BackgroundDataGrid = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush) + MachDbWindowVM.BackGroundHeader = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush) + MachDbWindowVM.ForegroundHeader = Brushes.White + MachDbWindowVM.BorderBrushHeader = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush) + MachDbWindowVM.BorderThicknessHeader = 0.0 + MachDbWindowVM.FontWeightHeader = FontWeights.Bold + MachDbWindowVM.BackgroundDataGrid = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush) + MachDbWindowVM.BorderBrushDataGrid = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush) + MachDbWindowVM.BackgroundDataGridRow = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush) + MachDbWindowVM.ForegroundDataGridRow = Brushes.White + MachDbWindowVM.BorderBrushDataGridRow = Brushes.DarkGray + MachDbWindowVM.BorderThicknessDataGridRow = "0 0 0 1" + MachDbWindowVM.BorderBrushDataGridCell = Brushes.DarkGray + MachDbWindowVM.BorderThicknessDataGridCell = "0 0 1 0" + Dim MachDbWindowV As New MyMachiningDbWindowV(Application.Current.MainWindow, MachDbWindowVM)