manually insert Page break in Devexpress xtrareport

[nandan]

Hi,
Iam using devexpress xtrareports with vb.net .I want to insert page break after writting some contents to the Detail area(band). can anybody help me?Thanks in advance
Nandan
I using the following code
Private Function drawtable()
Try
Dim table As XRTable
Dim row() As XRTableRow
Dim cell() As XRTableCell
table = New XRTable

For i As Integer = 1 To 500
ReDim row(i + 1)
row(i) = New XRTableRow
For index As Integer = 1 To 10
ReDim cell(index + 1)
cell(index) = New XRTableCell
cell(index).Width = 90
cell(index).Text = index.ToString()
row(i).Cells.Add(cell(index))
'cell(index).Dispose()
Next
table.Width = 900
table.Rows.Add(row(i))
If i = 5 Then
Detail.PageBreak = DevExpress.XtraReports.UI.PageBreak.AfterBand
End If
Next
table.Borders = DevExpress.XtraPrinting.BorderSide.All
table.BorderWidth = 1
table.BorderColor = Color.Black
table.Location = New System.Drawing.Point(0, 0)
DetailPanel.Width = 900
DetailPanel.Controls.Add(table)
Catch ex As Exception
MsgBox(ex.ToString())
End Try

End Function

[r035198x]

Hi,
Iam using devexpress xtrareports with vb.net .I want to insert page break after writting some contents to the Detail area(band). can anybody help me?Thanks in advance
Nandan
I using the following code
Private Function drawtable()
Try
Dim table As XRTable
Dim row() As XRTableRow
Dim cell() As XRTableCell
table = New XRTable

For i As Integer = 1 To 500
ReDim row(i + 1)
row(i) = New XRTableRow
For index As Integer = 1 To 10
ReDim cell(index + 1)
cell(index) = New XRTableCell
cell(index).Width = 90
cell(index).Text = index.ToString()
row(i).Cells.Add(cell(index))
'cell(index).Dispose()
Next
table.Width = 900
table.Rows.Add(row(i))
If i = 5 Then
Detail.PageBreak = DevExpress.XtraReports.UI.PageBreak.AfterBand
End If
Next
table.Borders = DevExpress.XtraPrinting.BorderSide.All
table.BorderWidth = 1
table.BorderColor = Color.Black
table.Location = New System.Drawing.Point(0, 0)
DetailPanel.Width = 900
DetailPanel.Controls.Add(table)
Catch ex As Exception
MsgBox(ex.ToString())
End Try

End Function

You posted this in the cafe/lounge.
I've moved it to the NET forum.