Con el código que indicas no eliminas la cita, solamente la vacías, tendrías que aplicar:
Código Delphi
[-]
DMCitasCalendario.QIntervalo.Edit;
DMCitasCalendario.QIntervalo.Delete;
Según releo, quizás lo que quieres sea:
Código Delphi
[-]
DMCitasCalendario.QIntervaloUSUARIO.Clear ;
Un Saludo.