Delphi - TPlannerMonthView set Item Color-CodePudding

im trying build a darkmode for my programm and now i have again a problem with the PlannerMonthView from TMS. You can change close to any color of the Month Planner but not the Item Color. Does anyone know how to change it to a diffrent Color like grey or something like that?

CodePudding user response：

Set then TPlannerMonthViewItems[n].color to desired color

  with PlannerMonthView.CreateItem do
  begin
    id            := 1;
    Color         := clGray;
    CaptionBkg    := Color;
    shadow        := true;
    Text.Text     := 'Test1';
    ItemStartTime := StrToDate('21/09/2021');
    ItemEndTime   := StrToDate('21/09/2021');
  end;