服务调度程序中的 VCL 组件

【问题标题】：VCL components in a service scheduler服务调度程序中的 VCL 组件
【发布时间】：2015-11-23 06:06:44
【问题描述】：

我正在使用 TcxScheduler、TcxSchedulerStorage 和 TIBOQuery 在一个系统中用VCL形式的组件在一个日历中进行服务调度。在系统内部，我管理事件和员工休息时间。但是，在 DataNavigator 属性中，它的子属性 ShowdatesContainingEventsinBold 已启用。当调用 cxScheduler.DateNavigator.Visible 事件时，作为事件创建的休息日以粗体标记。有没有其他方法可以创建中断而不将它们标记为事件？

【问题讨论】：

你问过组件供应商吗？
很遗憾，我无法获得组件制造商的支持。如果有人有能力帮助停留在喜欢的话题上，那就更多了。
如果您拥有 Devex VCL 库（包括 TcxScheduler）的许可副本，您有权使用他们的支持。你没试过问他们吗？

标签： delphi calendar devexpress vcl

【解决方案1】：

我不确定你想要什么。你的问题很模糊。

你想在你的 cxScheduler 中加粗特定的日子

如果是这样，您可以像这样在实现时创建一个 DateNavigator.CustomDrawDayNumber 事件：

procedure TForm1.cxScheduler1DateNavigatorCustomDrawDayNumber(Sender: TObject; ACanvas: TcxCanvas; AViewInfo: TcxSchedulerDateNavigatorDayNumberViewInfo; var ADone: Boolean);
begin
  if DayOfWeek(AViewInfo.Date) in [1, 7] then
    ACanvas.Font.Color := clRed;
end;

【讨论】：

这是我正在使用的一些代码。pastebin.com/4pusm1tj 还有，这是我正在编辑的窗口的图像i.imgur.com/S2WJcKE.jpg 左侧用红色标出的是员工的工作休息时间，我将这些工作休息时间注册为事件，但是我不希望日历（右侧）以粗体突出显示这些事件，我希望日历忽略这些特定事件。