TDBPlannerMonthView - XYToItem

VCL TMS VCL UI Pack
1

Please, TDBPlannerMonthView does not have XYToItem (X, Y) method? I downloaded the code from your web. I was very surprised. What is the reason for this?

  Item := dbplDay.XYToItem(X, Y);

  if Assigned(Item) then
    dbplDay.Items.Select(Item);
2

Use
monthview.DateAtXY(X, Y, dt);
APlannerItem := monthview.items.FindItemAtDate(dt, X, Y);

3

Thanks