AppStd/TaskFlow
8
1
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

GROUP_PROFILE Items

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber
2018-02-07 15:49:35 +01:00
parent 6835cda1a1
commit 87579d289e
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
app/DD_PM_WINDREAM/frmMain.vb
View File

@@ -209,8 +209,8 @@ Public Class frmMain
End Try End Try
Try Try
GridViewProfile.Columns.Item("TITLE").GroupIndex = 0 GridViewProfile.Columns.Item("PROFILE_GROUP_TEXT").GroupIndex = 0
GridViewProfile.Columns.Item("TITLE").Visible = False GridViewProfile.Columns.Item("PROFILE_GROUP_TEXT").Visible = False
GridViewProfile.Columns.Item("PROFILE_ID").Visible = False GridViewProfile.Columns.Item("PROFILE_ID").Visible = False
GridViewProfile.Columns.Item("FULL_FILE_PATH").Visible = False GridViewProfile.Columns.Item("FULL_FILE_PATH").Visible = False
GridViewProfile.Columns.Item("DOC_ID").Visible = False GridViewProfile.Columns.Item("DOC_ID").Visible = False
@@ -390,7 +390,7 @@ Public Class frmMain
Dim info As GridGroupRowInfo = TryCast(e.Info, GridGroupRowInfo) Dim info As GridGroupRowInfo = TryCast(e.Info, GridGroupRowInfo)
Dim view As GridView = sender Dim view As GridView = sender
If info.Column.FieldName = "TITLE" Then If info.Column.FieldName = "PROFILE_GROUP_TEXT" Then
info.GroupText = info.GroupValueText info.GroupText = info.GroupValueText
info.Appearance.BackColor = Color.LightGray info.Appearance.BackColor = Color.LightGray
End If End If