From 4a62d456d0fe4b53a9eb1759adfc7b83fbb164ee Mon Sep 17 00:00:00 2001 From: OlgunR Date: Tue, 27 Jan 2026 10:31:59 +0100 Subject: [PATCH] Set explicit grid column widths and enable auto width Replaced best-fit columns with fixed widths for GUID, PROFILE_ID, and EMAIL_SUBJECT. Enabled ColumnAutoWidth for improved layout control. --- App/EmailProfiler.Form/frmMain.vb | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) 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