Item date errors in TPlanner

VCL TMS VCL UI Pack
1

I am creating TPlannerItems (not using TDBPlanner)programmatically after reading from a separate SQL Server database. <?: prefix = o ns = "urn:schemas-microsoft-com:office:office" />

I am using the 7.1.4.0 component set.

The planner component is in month mode, showing all of 2014. I have items starting and ending in January 2014.

With January as the starting month, everything displays correctly as to the start and end date, with correct information in the caption.

If I shift the starting month to February, any planner items starting in January show the correct starting date and show the double arrows indicating that date, but all have an end date of February 17th.

Oddly, if I execute the following code with a starting month of February, the item is created and displayed correctly:

with MonthPlanner.CreateItem do
begin
  ItemStartTime := EncodeDate(2014,1,15);
  ItemEndTime := EncodeDate(2014,2,16);
  CaptionType := ctTime;
end;

I want to give the user the ability to change the displayed period, but this throws everything off.

 

What is causing this shift in ending dates?

2

As you asked the same question by direct email, it was answered by direct email.
Please try to use one communication channel only. Using multiple channels for the same question only increases overhead for everyone.