Clearly I'm doing something wrong because, when I try adding an item, it's not appearing in the planner.
I've tried this:
Planner.BeginUpdate;
Planner.AddOrUpdateItem(AppointmentStartDateTime,
AppointmentEndDateTime,
AppointmentDialog.edtTitle.Text,
AppointmentDialog.mmoNotes.Text).Resource := ResourceNumber;
AppointmentEndDateTime,
AppointmentDialog.edtTitle.Text,
AppointmentDialog.mmoNotes.Text).Resource := ResourceNumber;
Planner.EndUpdate;
as well as this:
Planner.BeginUpdate;
Appointment := Planner.Items.Add;Appointment.Title := AppointmentDialog.edtTitle.Text;
Appointment.Text := AppointmentDialog.mmoNotes.Text;
Appointment.StartTime := AppointmentStartDateTime;
Appointment.EndTime := AppointmentEndDateTime;
Appointment.Resource := ResourceNumber;
Planner.EndUpdate;
The code executes but the item isn't added. I've checked the values and they're all correct but I must be missing something.
The planner is linked to a TTMSFNCPlannerDatabaseAdapter, which is linked to a TDataset that is connected to a database table. All of the fields have been defined in the TTMSFNCPlannerDatabaseAdapter.
= Steve