我正在寻找一个用于 Delphi 7 的自定义可视组件,它可以处理日历上的日程安排。我不是在寻找实际的日历,也绝对不是在寻找一些经过彻底修改的许可组件。我只想要一个简单的视觉组件,带有类似轨迹栏的项目列表。例如,在左侧,我可以列出员工姓名。每条记录都跨越控件。右边的X轴代表时间,每个员工(Y轴)记录可以有多个时间段(开始..结束),这些时间段不仅显示在员工的右侧,而且用户可以调整每个时间段的大小,拖动它们、删除它们等等。它显然将用于这个确切的目的,用于安排员工工作时间。我不需要任何与其他东西集成的东西,例如数据库,我可以自己完成所有工作。我只想要一个简单的控件,可以用于直观地创建这样的时间表。
最佳答案
Visual Plan-It听起来它可能符合要求。它是 TurboPower Software 的旧组件库之一,他们在退出 VCL 业务时非常愿意将其开源。
您没有提到 Delphi 的版本,但据我所知,上述内容适用于 Delphi 7 之前的所有版本。如果您稍微搜索一下,您也许可以找到 D2009 及更高版本(支持 Unicode)的更新版本.
编辑:查看 Visual Plan-It 后,您似乎只需进行一些更改即可使其在 XE2 下编译。如果您打开 Delphi 7 包 (v103_d7.dpk),然后从 Project Manager
上下文菜单中选择 Install
,您将在许多包含指针取消引用的行上收到错误运算符 (^
) 如 List^
中所示;只需删除保留成员名称的运算符,如 List
中所示。
其余错误与对 inherited;
的无效调用有关(将其更改为 inherited SetPointer(Ptr, Size);
来修复它,并调用 LoadBitmap
提示不兼容的类型:PWideChar 和 PAnsiChar
- 这个只需将 LoadBitmap
更改为 LoadBitmapA
,作为参数传递给调用它的函数被声明为接收 PAnsiChar
参数。
您还需要编写自己的 TVpCustomDataStore
后代(请参阅 VpBaseDS.pas
)来处理数据存储;这些演示使用 BDE 或 Flex 数据库,由于我没有安装其中任何一个,所以无法给您屏幕截图。我的办公室可能安装了 D7 或 2007 版本;我明天会检查,如果是的话更新我的答案。
关于delphi - 寻找日程安排/日历组件,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/7882803/