LookUpHelper Class

Enables you to obtain parameter values that were selected in the look-up editor.

Namespace: DevExpress.XtraReports.Parameters

Assembly: DevExpress.Printing.v19.2.Core.dll

Declaration

C#

public static class LookUpHelper

VB.NET

Public Module LookUpHelper

Remarks

The following code illustrates how to display the currently selected values of a multi-value parameter in a report.

C#

using DevExpress.Data.Browsing;
using DevExpress.XtraPrinting.Native;
using DevExpress.XtraReports.UI;
using System;
// ...

private void XtraReport1_BeforePrint(object sender, System.Drawing.Printing.PrintEventArgs e) {
    var text = "";
    var lookupValues = DevExpress.XtraReports.Parameters.LookUpHelper.GetLookUpValues(
        this.Parameters["parameter1"].LookUpSettings, ((XtraReport)sender).GetService<DataContext>());
    var categoriesArray = (Int64[])this.Parameters["parameter1"].Value;
    int step = 0;
    for (var j = 0; j < lookupValues.Count; j++) {
        if (Array.IndexOf(categoriesArray, Convert.ToInt32(lookupValues[j].Value)) > -1) { 
            step += 1;
            if (step == categoriesArray.Length) {
                text += lookupValues[j].RealDescription;
            }
            else {
                text += lookupValues[j].RealDescription + ", ";
            }
        }
    }
    xrLabel1.Text = text;
}

VB.NET

Imports DevExpress.Data.Browsing
Imports DevExpress.XtraPrinting.Native
Imports DevExpress.XtraReports.UI
Imports System
' ...

Private Sub XtraReport1_BeforePrint(sender As Object, e As System.Drawing.Printing.PrintEventArgs)
    Dim text = ""
    Dim lookupValues = DevExpress.XtraReports.Parameters.LookUpHelper.GetLookUpValues( _ 
        Me.Parameters("parameter1").LookUpSettings, DirectCast(sender, XtraReport).GetService(Of DataContext)())
    Dim categoriesArray = DirectCast(Me.Parameters("parameter1").Value, Int64())
    Dim [step] As Integer = 0
    For j As var = 0 To lookupValues.Count - 1
        If Array.IndexOf(categoriesArray, Convert.ToInt32(lookupValues(j).Value)) > -1 Then
            [step] += 1
            If [step] = categoriesArray.Length Then
                text += lookupValues(j).RealDescription
            Else
                text += lookupValues(j).RealDescription + ", "
            End If
        End If
    Next
    xrLabel1.Text = text
End Sub

Inheritance

Object

LookUpHelper