开源一个自绘的时间轴

Window.创建 (0, 0, 700, 600, A2W (“时间轴”), , , , , , 位或 (#窗口_ESC关闭窗口, #窗口_主窗口, #窗口_随意移动, #窗口_居中, #窗口_标题, #窗口_标题栏取消置顶, #窗口_关闭按钮, #窗口_最小化按钮, #窗口_最大化按钮, #窗口_调整尺寸))
VJ_注册控件 (“timeaxis”, , #组件风格_可视, 位或 (#组件风格EX_允许焦点, #组件风格EX_自定义绘制))
Window_Obj ＝ Window.取句柄 ()
时间轴.创建 (Window_Obj, 10, 50, 0, 0, 200, 50)
时间轴.锁定 (10, 30, 10, 10)
时间轴.置颜色 (0, RGB2ARGB (#白色))
时间轴.加入项目 (A2W (#常量3), A2W (到文本 (取现行时间 ())), A2W (“timeline-event timeline-event-primary”), RGB2ARGB (#紫色), , 0)
时间轴.加入项目 (A2W (“timeline-item timeline-item-arrow-sm”), A2W (到文本 (取现行时间 ())), A2W (“timeline-event timeline-event-info”), RGB2ARGB (#蓝色), RGB2ARGB (#黄色), 1)
时间轴.加入项目 (A2W (#常量2), A2W (到文本 (取现行时间 ())), A2W (“timeline-event timeline-event-warning”), RGB2ARGB (12371199), RGB2ARGB (#黑色), 0)
时间轴.加入项目 (A2W (#常量1), A2W (到文本 (取现行时间 ())), A2W (“timeline-point timeline-point-blank”), RGB2ARGB (#黄褐), , 1)