diff --git a/App/EmailProfiler.Form/frmMain.vb b/App/EmailProfiler.Form/frmMain.vb index 2a050c2..3c910e7 100644 --- a/App/EmailProfiler.Form/frmMain.vb +++ b/App/EmailProfiler.Form/frmMain.vb @@ -1067,8 +1067,16 @@ Public Class frmMain Dim gridView = TryCast(Me.GridView5, DevExpress.XtraGrid.Views.Grid.GridView) If gridView IsNot Nothing Then - gridView.OptionsView.ColumnAutoWidth = False - gridView.BestFitColumns() + gridView.OptionsView.ColumnAutoWidth = True + If gridView.Columns("GUID") IsNot Nothing Then + gridView.Columns("GUID").Width = 50 + End If + If gridView.Columns("PROFILE_ID") IsNot Nothing Then + gridView.Columns("PROFILE_ID").Width = 50 + End If + If gridView.Columns("EMAIL_SUBJECT") IsNot Nothing Then + gridView.Columns("EMAIL_SUBJECT").Width = 300 + End If End If Catch ex As Exception