Jedi JVCL TimeLine Days

[paule32.jk]

Hallo,

ich habe ein Problem mit einer Jedi JVCL Komponente - genauer: TJvTFDays
wie kann ich innerhalb einer Zeit ein Event/Termin eintragen ?

ich habe dazu folgendes Snippet, aber es fügt nur Spalten an.
Wie kann ich aber "inkaufen" auf 2:30 Uhr eintraggen?

Delphi-Quellcode:

procedure TFrame31.JvTFDays1DblClick(Sender: TObject);
var
  ap : TJvTFAppt;
  ac : TJvTFDaysCol;
begin
  ap := TJvTFAppt.Create(JvTFScheduleManager1,'lolo');

  ac := JvTFDays1.Cols.Add;
  ap := ac.GetFirstAppt;
  ap.SetStartEnd(Date,Time,Date+1,Time);
end;