Nullable DateTime Parameter

Hello,

I need to pass a nullable datetime parameter in a report but I can't find a way.

I tried two ways:

1. In the report I used this:

Public Sub New()

InitializeComponent()

Dim p1 As New DevExpress.XtraReports.Parameters.Parameter

p1.Type = GetType(System.Nullable(Of DateTime))

p1.Name = "p1"

p1.Value = Now.Date

p1.Visible = True

Me.Parameters.Add(p1)

End Sub

which does not show the parameter. If I use p1.Type = GetType(DateTime) it works fine, but this is not what I want.

2. I tried to add a dateedit control on create of report like this:

docModel = New XtraReportPreviewModel(clsRep)

AddHandler docModel.CustomizeParameterEditors, AddressOf TotalMoves_Sell_CustomizeParameterEditors

......

Private Sub TotalMoves_Sell_CustomizeParameterEditors(ByVal sender As Object, ByVal e As CustomizeParameterEditorsEventArgs)

If e.Parameter.Name = "pSellDateFrom" Then

Dim dteSellDateFrom As New DateEdit

dteSellDateFrom.EditValue = Nothing

e.Editor = dteSellDateFrom

e.BoundDataMember = "EditValue"

End If

End Sub

but DateEdit cannot be converted to BaseEdit

Can you provide me a solution please?

Thanks

Michalis