Source position: jvtfglance.pas line 454
type TJvTFGlanceDropApptEvent = procedure(
Sender: TObject;
Appt: TJvTFAppt;
var NewStartDate: TDate;
var NewEndDate: TDate;
var Confirm: Boolean
) of object;