How to: Bind a Report to an Object Data source (Runtime Sample)

• Oct 29, 2020
• 2 minutes to read

The SnapControl supports object data sources that implement any of the following interfaces:

• IList;
• ITypedList;
• IBindingList;
• IList<T>;
• IEnumerable<T>;

You can use the ObjectDataSource when an object provides data at runtime or a method that returns the data as an object.

Handle the Load event of the application’s main form as shown below to connect the application to an object data source.

C#

using System;
using System.Collections.Generic;
using System.Data;
using System.Data.OleDb;
using System.Windows.Forms;
using DevExpress.Snap.Core.API;
// ...

class Cars {
    public int ID { get; set; }
    public string Trademark { get; set; }
    public string Model { get; set; }
}

private void Form1_Load(object sender, EventArgs e) {

    List<Cars> e1List = new List<Cars>();
    e1List.Add(new Cars() { ID = 1, Trademark = "Mercedes-Benz", Model = "SL500 Roadster" });
    e1List.Add(new Cars() { ID = 2, Trademark = "BMW", Model = "530i" });    

    snapControl1.Document.BeginUpdateDataSource();
    this.snapControl1.Document.DataSources.Add(new DataSourceInfo("Cars", e1List));   
    snapControl1.Document.EndUpdateDataSource();

}

VB.NET

Imports System
Imports System.Collections.Generic
Imports System.Data
Imports System.Data.OleDb
Imports System.Windows.Forms
Imports DevExpress.Snap.Core.API
' ...

Friend Class Cars
    Private privateID As Integer
    Public Property ID() As Integer
        Get
            Return privateID
        End Get
        Set(ByVal value As Integer)
            privateID = value
        End Set
    End Property
    Private privateTrademark As String
    Public Property Trademark() As String
        Get
            Return privateTrademark
        End Get
        Set(ByVal value As String)
            privateTrademark = value
        End Set
    End Property
    Private privateModel As String
    Public Property Model() As String
        Get
            Return privateModel
        End Get
        Set(ByVal value As String)
            privateModel = value
        End Set
    End Property
End Class

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Dim e1List As New List(Of Cars)()
    e1List.Add(New Cars() With {.ID = 1, .Trademark = "Mercedes-Benz", .Model = "SL500 Roadster"})
    e1List.Add(New Cars() With {.ID = 2, .Trademark = "BMW", .Model = "530i"})    

    SnapControl1.Document.BeginUpdateDataSource()
    Me.SnapControl1.Document.DataSources.Add(New DataSourceInfo("Cars", e1List))    
    SnapControl1.Document.EndUpdateDataSource()

End Sub