AppointmentForm.IsAppointmentChanged(Appointment) Method

This method is called automatically to determine whether a user has modified an appointment. If your appointments have custom fields that are editable through that form, override this method to manually compare custom field data.

Namespace: DevExpress.XtraScheduler.UI

Assembly: DevExpress.XtraScheduler.v18.2.dll

Declaration

C#

public virtual bool IsAppointmentChanged(
    Appointment appointment
)

VB.NET

Public Overridable Function IsAppointmentChanged(
    appointment As Appointment
) As Boolean

Parameters

Name	Type	Description
appointment	Appointment	An Appointment object that is the appointment edited in the appointment form.

Returns

Type	Description
Boolean	true, if a custom appointment field is changed for the appointment loaded in the editing form; otherwise, false.

Remarks

The following code illustrates how to use the IsAppointmentChanged method in a custom form to indicate that a custom field is modified so that the AppointmentFormController object on the form will save the appointment.

Note

A complete sample project is available at https://github.com/DevExpress-Examples/lesson-7-create-a-custom-appointment-edit-form-t342127

CustomAppointmentForm.cs

string _contacts;

public virtual void LoadFormData(Appointment appointment) {
    if (appointment.CustomFields["Contacts"] == null)
        mxContacts.Text = "";
    else {
        _contacts = appointment.CustomFields["Contacts"].ToString();
        mxContacts.Text = _contacts;
    }

}
public virtual bool SaveFormData(Appointment appointment) {
    appointment.CustomFields["Contacts"] = mxContacts.Text;
    return true;

}
public virtual bool IsAppointmentChanged(Appointment appointment) {
    if (_contacts == appointment.CustomFields["Contacts"].ToString())
        return false;
    else
        return true;
}

CustomAppointmentForm.vb

Private _contacts As String

Public Overridable Sub LoadFormData(ByVal appointment As Appointment)
    If appointment.CustomFields("Contacts") Is Nothing Then
        mxContacts.Text = ""
    Else
        _contacts = appointment.CustomFields("Contacts").ToString()
        mxContacts.Text = _contacts
    End If

End Sub
Public Overridable Function SaveFormData(ByVal appointment As Appointment) As Boolean
    appointment.CustomFields("Contacts") = mxContacts.Text
    Return True

End Function
Public Overridable Function IsAppointmentChanged(ByVal appointment As Appointment) As Boolean
    If _contacts = appointment.CustomFields("Contacts").ToString() Then
        Return False
    Else
        Return True
    End If
End Function