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.
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user