Android Example [B4X] AS Scheduler - MonthView HeatMap

[B4X] [XUI] AS Scheduler ? - MonthView, DayView (Week), AgendaView and CalendarView [Payware]

The AS Scheduler is a B4X library for displaying and interacting with appointments. You want to try the views out? Then click here This library is not free, because, it cost a lot of time and gray hair to create such views. https://payhip.com/b/nrtw5 Thanks for your understanding. :) The...

www.b4x.com

Setup
-Set in the designer the "Calendar Function" to "HeatMap"
-Done

Customizing
You can set your own colors

Dim HeatColor As List : HeatColor.Initialize
HeatColor.Add(ASSchedulerUtils.CreateASScheduler_HeatMapColor(xui.Color_ARGB(255,214, 230, 133),0,xui.Color_White))
HeatColor.Add(ASSchedulerUtils.CreateASScheduler_HeatMapColor(xui.Color_ARGB(255,140, 198, 101),2,xui.Color_White))
HeatColor.Add(ASSchedulerUtils.CreateASScheduler_HeatMapColor(xui.Color_ARGB(255,68, 163, 64),4,xui.Color_White))
HeatColor.Add(ASSchedulerUtils.CreateASScheduler_HeatMapColor(xui.Color_ARGB(255,30, 104, 35),7,xui.Color_White))
ASScheduler_MonthView1.HeatMapProperties.ColorCountList = HeatColor

Example Data

    'HeatMap Example Data
    For i = 1 To 40 -1
        Dim p As Period
        p.Initialize
        p.Days = i
        Dim Date As Long = DateUtils.AddPeriod(DateTime.Now,p)
        For z = 1 To Rnd(2,12) -1
            ASScheduler_MonthView1.API.CreateAppointment(ASSchedulerUtils.CreateASScheduler_AppointmentRecurring(0,"Test1","Description",xui.Color_ARGB(255,73, 98, 164),False,Date,Date+DateTime.TicksPerHour,False,"day",7))
        Next
    Next

    ASScheduler_MonthView1.CreateScheduler