Sunghalee 发表于 2019-11-20 10:08:26

换成MultiRow后,ColumnHeaders应该替换成什么?

红色部分是编译error,GcMultiRow要换成MultiRow,后续ColumnHeaders应该替换成什么?

Private Sub ClearMeisai()
      'Dim mHeadCaption As GrapeCity.Win.GcMultiRow.ColumnHeaders.MHeader = Nothing

      Me.eltDataList.Redraw = False
      If eltDataList.MaxMRows <> 0 Then
            Me.eltDataList.ActivePosition = New MPosition(0, 2, 0)
            Me.eltDataList.Clear()
            Me.eltDataList.MaxMRows = 0
            Me.eltDataList.DataSource = Nothing
      End If

      mHeadCaption = eltDataList.ColumnHeaders(2, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(3, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(4, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(5, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(6, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(7, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(8, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(9, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(10, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(11, 0)
      mHeadCaption.Caption = String.Empty
      mHeadCaption = eltDataList.ColumnHeaders(12, 0)
      mHeadCaption.Caption = String.Empty
      Me.eltDataList.Redraw = True

      Me.eltDataList.FreezeColumns = 2

      Me.eltDataList.FreezeLine = GridLine.Empty
      '_objJKP140FormState.DecOFSHNO = -3
    End Sub

Richard.Ma 发表于 2019-11-20 10:08:27

this.gcMultiRow1.ColumnHeaders.Cells

在MultiRow里面,有一个ColumnHeaders区域,这个区域可以有很多个 ColumnHeaderSection,一个ColumnHeaderSection相当于一行,可以放很多的cell
页: [1]
查看完整版本: 换成MultiRow后,ColumnHeaders应该替换成什么?