AppointmentDataStorage.CreateAppointment(AppointmentType, DateTime, DateTime, String) Method

Creates an appointment of the specified type with the specified start time, end time and a subject.

Namespace: DevExpress.XtraScheduler

Assembly: DevExpress.XtraScheduler.v24.2.dll

Declaration

C#

public Appointment CreateAppointment(
    AppointmentType type,
    DateTime start,
    DateTime end,
    string subject
)

VB.NET

Public Function CreateAppointment(
    type As AppointmentType,
    start As Date,
    end As Date,
    subject As String
) As Appointment

Parameters

Name	Type	Description
type	AppointmentType	An AppointmentType enumeration value specifying the type of the created appointment.
start	DateTime	A DateTime object specifying the appointment start - the value of the Appointment.Start property.
end	DateTime	A DateTime object specifying the appointment end - the value of the Appointment.End property.
subject	String	A string that is the appointment’s subject - the value of the Appointment.Subject property.

Returns

Type	Description
Appointment	A newly created Appointment object.

Remarks

Use the CreateAppointment method to create an appointment. The method is equivalent to the SchedulerDataStorage.CreateAppointment method.

Subsequently use the AppointmentDataStorage.Add method to add a newly created appointment to the storage.

C#

Appointment apt = schedulerDataStorage.CreateAppointment( 
    AppointmentType.Normal, 
    DateTime.Now, 
    DateTime.Now.AddMinutes(15), 
    "Appointment Created in Code");
schedulerDataStorage.Appointments.Add(apt); 

VB.NET

Dim apt As Appointment = schedulerDataStorage.CreateAppointment(AppointmentType.Normal, Date.Now, Date.Now.AddMinutes(15), "Appointment Created in Code") 
schedulerDataStorage.Appointments.Add(apt) 

The following code illustrates how to add multiple appointments in code.

C#

int count = 10;
Appointment[] AppArray = new Appointment[count];
AppointmentCollection AppCollection = new AppointmentCollection();
for (int i=1; i<=count; i++) {
    Appointment newApp = schedulerControl.DataStorage.CreateAppointment(AppointmentType.Normal);
    newApp.Start = DateTime.Now.AddMinutes(count);
    newApp.End = DateTime.Now.AddMinutes(count * 2);
    AppCollection.Add(newApp);
}
AppCollection.CopyTo(AppArray, 0);
schedulerControl.DataStorage.BeginUpdate();
schedulerControl.DataStorage.Appointments.AddRange(AppArray);
schedulerControl.DataStorage.EndUpdate();

VB.NET

Dim count As Integer = 10
Dim AppArray(count - 1) As Appointment
Dim AppCollection As New AppointmentCollection()
For i As Integer = 1 To count
    Dim newApp As Appointment = schedulerControl.DataStorage.CreateAppointment(AppointmentType.Normal)
    newApp.Start = Date.Now.AddMinutes(count)
    newApp.End = Date.Now.AddMinutes(count * 2)
    AppCollection.Add(newApp)
Next i
AppCollection.CopyTo(AppArray, 0)
schedulerControl.DataStorage.BeginUpdate()
schedulerControl.DataStorage.Appointments.AddRange(AppArray)
schedulerControl.DataStorage.EndUpdate()

Related GitHub Examples

The following code snippets (auto-collected from DevExpress Examples) contain references to the CreateAppointment(AppointmentType, DateTime, DateTime, String) method.

Note

The algorithm used to collect these code examples remains a work in progress. Accordingly, the links and snippets below may produce inaccurate results. If you encounter an issue with code examples below, please use the feedback form on this page to report the issue.

C#

winforms-scheduler-sync-with-ews/CS/EWSSyncExample/ExchangeExampleForm.cs#L17

// Create a recurring Appointment.
var apt = schedulerDataStorage1.Appointments.CreateAppointment(DevExpress.XtraScheduler.AppointmentType.Pattern, now, now.AddHours(2), "TEST_TEST");

winforms-scheduler-country-specific-work-week-holidays/CS/Form1.cs#L35

DateTime endDate = startDate.AddHours(2);
var appointment = schedulerDataStorage1.Appointments.CreateAppointment(AppointmentType.Normal, startDate, endDate, startDate.ToLongDateString());
schedulerDataStorage1.Appointments.Add(appointment);

VB.NET

winforms-scheduler-sync-with-ews/VB/EWSSyncExample/ExchangeExampleForm.vb#L19

' Create a recurring Appointment.
Dim apt = schedulerDataStorage1.Appointments.CreateAppointment(DevExpress.XtraScheduler.AppointmentType.Pattern, now, now.AddHours(2), "TEST_TEST")

winforms-scheduler-country-specific-work-week-holidays/VB/Form1.vb#L33

Dim endDate As Date = startDate.AddHours(2)
Dim appointment = schedulerDataStorage1.Appointments.CreateAppointment(AppointmentType.Normal, startDate, endDate, startDate.ToLongDateString())
schedulerDataStorage1.Appointments.Add(appointment)