[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
						
					
					www.b4x.com
				Setup
-Set in the designer the "Calendar Function" to "HeatMap"
-Done
Customizing
You can set your own colors
			
				B4X:
			
		
		
		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 = HeatColorExample Data
			
				B4X:
			
		
		
		    '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 
				