0

我正在尝试将 a 绑定XtraReport到 a BindingSource（而不是 a Dataset），并希望在数据源中的值使用报告参数到达报告之前对其进行过滤。

我已经在报表设计器中声明了参数和绑定源。所以我设置了字段和所有内容。

根据这篇文章，我现在可以在LoadWindows 窗体的情况下加载集合。但我不想那样。

换句话说，报表不应该从自定义StoreCollection（List<T>自定义Store类型）中加载所有行，而应该只加载由参数确定的行。

我将如何做到这一点？

注意：我知道它BindingSource有一个Filter属性，但我不确定如何将我的参数传递给它（这些参数用于从数据库中检索数据并返回一个自定义类型列表）。

谢谢你。

4

1 回答 1

0

我会在数据进入报告之前使用 LINQ 来选择数据。我的代码在 VB.net 中，但可以很容易地翻译：

1 - 创建一个数据对象 - 将包含我们的数据

Public Class Animal
    Public name As String
    Public livesYears As Integer
    Public location As String
End Class

2 - 创建 XtraReport1。将 aBindingSource放到设计器上并将其设置DataSource为Animal。如果Animal没有出现在向导生成的列表中，您将需要重新构建您的解决方案。将几个字段放到设计器上...“名称”等，以便报告有一些东西要...报告！

3 - 创建子以填充列表

Private Function createAnimals() As List(Of Animal)
    Dim allAnimals As New List(Of Animal)

    allAnimals.Add(New Animal With {.name = "Snake", .livesYears = "12", .location = "Africa"})
    allAnimals.Add(New Animal With {.name = "Dog", .livesYears = "17", .location = "England"})
    allAnimals.Add(New Animal With {.name = "Cat", .livesYears = "14", .location = "Egypt"})
    allAnimals.Add(New Animal With {.name = "Hedgehog", .livesYears = "4", .location = "England"})
    allAnimals.Add(New Animal With {.name = "Dragon", .livesYears = "350", .location = "Canada"})
    allAnimals.Add(New Animal With {.name = "Bat", .livesYears = "28", .location = "Scotland"})

    Return allAnimals
End Function

4 - 在表单加载中创建报表实例

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load

    'create our list of animals (could be a for loop that adds each dataset row to the list of Animal)
    Dim allAnimals As List(Of Animal) = createAnimals()

    'select just the Animals that we want
    Dim justTheAnimalsIWant = (From ani In allAnimals
                              Where ani.location = "England"
                              Select ani).ToList

    'create instance of the report
    Dim report As New XtraReport1

    'set the datasource to justTheAnimalsIWant
    report.DataSource = justTheAnimalsIWant

    Dim printTool As ReportPrintTool = New ReportPrintTool(report)
    printTool.ShowPreview()
End Sub

上面的例子没有使用数据集，它使用了我们的Animal对象列表。要填充我们的Animal对象列表，您可以使用 for 循环遍历数据行并添加到Animal对象列表中。然后在使用 LINQ 选择您想要的内容后，就像使用justTheAnimalsIWant. 简单的。

于 2013-08-02T08:01:48.033 回答