Как предотвратить ненужное обновление пользовательского элемента управления, связанного с бизнес-объектом? - PullRequest
0 голосов
/ 16 декабря 2010

У меня есть приложение Windows Forms с пользовательским элементом управления для ввода дат.Это наследуется от Textbox и реализует свойство Value для привязки к базовому бизнес-объекту.

Все работает хорошо, за исключением того, что когда элемент управления проверяет, он обновляет связанное свойство, даже если оно не изменилось.Это проблема, потому что я использую Entity Framework, а изменение свойства объекта приводит к тому, что соответствующее поле в базе данных обновляется каждый раз, когда пользователь открывает и закрывает форму, на которой размещен этот элемент управления.

Воткод:

Public Class TextBoxDate
Inherits TextBox

Public ValueChanged As EventHandler

Private _dateValue As Nullable(Of Date) = Nothing
<Bindable(True)> _
<Category("Appearance")> _
Public Property Value() As Nullable(Of Date)
    ' Bind to the Value property instead of the Text property, as the latter will not allow
    ' the user to delete the contents of the textbox. The Value property provides support for nulls.
    Get
        Value = _dateValue
    End Get
    Set(ByVal value As Nullable(Of Date))
        _dateValue = value
        ' Update the text in the textbox
        If value.HasValue Then
            Text = CDate(value).ToShortDateString
        Else
            Text = vbNullString
        End If
        OnValueChanged()
    End Set
End Property

Private Sub OnValueChanged()
    If (ValueChanged IsNot Nothing) Then
        ValueChanged(Me, New EventArgs())
    End If

End Sub

Private Sub TextBoxDate_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Enter

    _userEntered = True

End Sub

Private Sub TextBoxDate_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Leave

    _userEntered = False

End Sub

Protected Overrides Sub OnValidating(ByVal e As System.ComponentModel.CancelEventArgs)

    If _userEntered Then
        If Me.TextLength = 0 Then
            ' Null value will be saved to the database via the bound Value property
            If Value IsNot Nothing Then
                Value = Nothing
            End If
        Else
            Dim dateValue As Date
            If Date.TryParseExact(Text, "d/M/yyyy", System.Globalization.DateTimeFormatInfo.InvariantInfo, Globalization.DateTimeStyles.None, dateValue) Then
                If Value Is Nothing Or (dateValue <> Value) Then
                    Value = CDate(Text)
                End If
            Else
                e.Cancel = True
            End If
        End If
    End If

    MyBase.OnValidating(e)

End Sub

End Class

Это сводит меня с ума.Любая помощь будет высоко ценится.

Скотт

1 Ответ

0 голосов
/ 15 февраля 2011

Когда вы определяете привязку текстового поля, вы можете указать DataSourceUpdateMode объекта Binding, например

Binding custNameBinding = new Binding("Text", ds, "customers.custName");
custNameBinding.DataSourceUpdateMode = DataSourceUpdateMode.OnPropertyChanged;
custNameTextBox.DataBindings.Add(custNameBinding);

Документация MSDN гласит «Источник данных обновляется всякий раз, когда значениеизменения свойства элемента управления. "

...