【结】DataGrid页眉颜色设置问题**

jianth2005

在DataGrid页眉颜色设置headerColor
改变颜色为蓝色了,但是保存关闭之后再打开该功能DataGrid页眉颜色又变回原来的白色,并不是蓝色.
不知道是设置DataGrid的哪个属性了,
指点下.

lixy

没有再现这个问题。能保存这个属性

jianth2005

object DataGrid1: TDataGrid
  Left = 0
  Top = 136
  Width = 786
  Height = 384
  Bands = <
    item
    end>
  HeaderPanelRowCount = 1
  Align = alClient
  TabOrder = 2
  OnDblClick = DataGrid1DblClick
  BandColor = clWindow
  GroupPanelColor = clWindow
  GroupPanelFontColor = clWindowText
  GroupNodeColor = clWindow
  HeaderColor = clWindow
  HideSelectionColor = 14258944
  HighlightColor = 14258944
  LookAndFeel = lfUltraFlat
  OptionsBehavior = [edgoAutoSort, edgoDblClick, edgoDragScroll, edgoEditing, edgoTabs, edgoTabThrough, edgoVertThrough]
  OptionsView = [edgoAutoWidth, edgoBandHeaderWidth, edgoIndicator, edgoRowSelect, edgoUseBitmap, edoControlDraw]
  OnCustomDrawCell = DataGrid1CustomDrawCell
  TreeLineColor = clGrayText
  ShowIndicator = True
  DataSource = DataSource1
  Filter.Criteria = {00000000}
  ShowRowNumber = True
  ViewAttributes.Style = vsNote
  ViewAttributes.ParentStyle = False
  ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
  UseDefaultPopupMenu = False
  DefaultFields = False
  SummaryGroups = <>
  SummarySeparator = ', '
  object DataGrid1SFDM: TDataGridColumn
    Visible = False
    Width = 119
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SFDM'
  end
  object DataGrid1SQBM: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SQBM'
  end
  object DataGrid1JDRQ: TDataGridColumn
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JDRQ'
  end
  object DataGrid1XM: TDataGridColumn
    Width = 80
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'XM'
  end
  object DataGrid1XB: TDataGridColumn
    Width = 55
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'XB'
  end
  object DataGrid1PYM: TDataGridColumn
    Visible = False
    Width = 116
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'PYM'
  end
  object DataGrid1XP: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'XP'
  end
  object DataGrid1GZDW: TDataGridColumn
    Visible = False
    Width = 140
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'GZDW'
  end
  object DataGrid1HJLX: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'HJLX'
  end
  object DataGrid1SFZH: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SFZH'
  end
  object DataGrid1CSRQ: TDataGridColumn
    Width = 88
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'CSRQ'
  end
  object DataGrid1FFLX: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'FFLX'
  end
  object DataGrid1LXDH: TDataGridColumn
    Width = 106
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'LXDH'
  end
  object DataGrid1JTBH: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JTBH'
  end
  object DataGrid1JTDH: TDataGridColumn
    Visible = False
    Width = 138
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JTDH'
  end
  object DataGrid1LXRXM: TDataGridColumn
    Visible = False
    Width = 185
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'LXRXM'
  end
  object DataGrid1ZZ: TDataGridColumn
    Sorted = csUp
    Width = 273
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'ZZ'
  end
  object DataGrid1HZ: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'HZ'
  end
  object DataGrid1YHZGX: TDataGridColumn
    Visible = False
    Width = 185
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'YHZGX'
  end
  object DataGrid1HYZK: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'HYZK'
  end
  object DataGrid1MZ: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'MZ'
  end
  object DataGrid1WHCD: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'WHCD'
  end
  object DataGrid1ZY: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'ZY'
  end
  object DataGrid1XX: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'XX'
  end
  object DataGrid1GMYW: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'GMYW'
  end
  object DataGrid1BLS: TDataGridColumn
    Visible = False
    Width = 116
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'BLS'
  end
  object DataGrid1JB: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JB'
  end
  object DataGrid1SS: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SS'
  end
  object DataGrid1SSMC1: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SSMC1'
  end
  object DataGrid1SSSJ1: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SSSJ1'
  end
  object DataGrid1SSMC2: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SSMC2'
  end
  object DataGrid1SSSJ2: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SSSJ2'
  end
  object DataGrid1WS: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'WS'
  end
  object DataGrid1WSMC1: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'WSMC1'
  end
  object DataGrid1WSSJ1: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'WSSJ1'
  end
  object DataGrid1WSMC2: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'WSMC2'
  end
  object DataGrid1WSSJ2: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'WSSJ2'
  end
  object DataGrid1SX: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SX'
  end
  object DataGrid1SXYY1: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SXYY1'
  end
  object DataGrid1SXSJ1: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SXSJ1'
  end
  object DataGrid1SXYY2: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SXYY2'
  end
  object DataGrid1SXSJ2: TDataGridColumn
    Visible = False
    Width = 166
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'SXSJ2'
  end
  object DataGrid1JZS: TDataGridColumn
    Visible = False
    Width = 116
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JZS'
  end
  object DataGrid1FQ: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'FQ'
  end
  object DataGrid1MQ: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'MQ'
  end
  object DataGrid1XDJM: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'XDJM'
  end
  object DataGrid1ZN: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'ZN'
  end
  object DataGrid1YCBS: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'YCBS'
  end
  object DataGrid1YCBM: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'YCBM'
  end
  object DataGrid1YWCJ: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'YWCJ'
  end
  object DataGrid1JWHBM: TDataGridColumn
    Visible = False
    Width = 185
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JWHBM'
  end
  object DataGrid1GXRQ: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'GXRQ'
  end
  object DataGrid1JDR: TDataGridColumn
    Visible = False
    Width = 116
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JDR'
  end
  object DataGrid1ZRYS: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'ZRYS'
  end
  object DataGrid1JDDW: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JDDW'
  end
  object DataGrid1JDMC: TDataGridColumn
    Visible = False
    Width = 149
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JDMC'
  end
  object DataGrid1XZQHBM: TDataGridColumn
    Visible = False
    Width = 217
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'XZQHBM'
  end
  object DataGrid1JWHMC: TDataGridColumn
    Visible = False
    Width = 185
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'JWHMC'
  end
  object DataGrid1ZT: TDataGridColumn
    Visible = False
    Width = 85
    BandIndex = 0
    RowIndex = 0
    ColumnDef.FieldName = 'ZT'
  end
end


帮忙看看,不得的话,我只能一个一个换DataGrid

lixy

测试了好久，删掉    ViewAttributes.Style = vsNote这句就好了。

jianth2005

呵呵,我找了好久没找到才发贴子问的
非常感谢!
结贴吧