[B4X] [XUI] [Old] AS CalendarAdvanced 📅 - OneRow/FiveRow Calendar - Expand and Collapse [Payware]

[Alexander Stolte]

Update

• 2.18
  • Removes log messages that should not be there

 

[MarcoRome]

If you set SetDateTimeLocale(GetPreferredLanguage) before you call CreateCalendar then no error occurs.
But why, i dont know.
This line is affected then:

Log(DateUtils.SetDate(DateTime.GetYear(ticks),DateTime.GetMonth(ticks),DateTime.GetDayOfMonth(ticks)))

But this has nothing to do with the view, because if I add this line after I set the locale with your code, then it also crashes outside of the view.
It looks like you have to set "SetDateTimeLocale" directly to app start so that no error occurs.

SetDateTimeLocale(GetPreferredLanguage)
Log(DateUtils.SetDate(DateTime.GetYear(DateTime.Now),DateTime.GetMonth(DateTime.Now),DateTime.GetDayOfMonth(DateTime.Now)))'crash outside of the view'
DateTime.DateFormat = "EEEE dd MMMM"
Label1.Text = DateTime.Date(DateTime.Now)
'SetDateTimeLocale("EN-en")

Yes, work without problem.
But out of curiosity, i also noticed that if you insert it at the end and insert a sleep (100) it works.
When debugging, it appears that before closing, (AsCalendar.Close) continues to execute the line of code for one more time

Return DateUtils.SetDate(DateTime.GetYear(ticks),DateTime.GetMonth(ticks),DateTime.GetDayOfMonth(ticks))

and finding the changed format fails.
In fact, inserting a Sleep(100) after AsCalendar.Close there is no error

....
ASCalendarAdvanced1.Close

Sleep(100)

SetDateTimeLocale(GetPreferredLanguage)
DateTime.DateFormat = "EEEE dd MMMM"
Label1.Text = DateTime.Date(DateTime.Now)

 

[Colin Evans]

Hi, I've donated, cheers Colin

 

[james_sgp]

Donation made...

 

[wimpie3]

I've discovered two bugs which are visible in the demo code.

1. The calendar starts in week mode with Sunday indicated in red. Pull down the calendar to put it in month mode and the same Sunday is still red, while the other Sundays are white. Move the calendar to the next month and return to the previous month. Now all Sundays are red.

2. Pull down the calendar to put it in month mode. Slide calendar to the left to show January. Slide back. Shows February. Perfect! Now slide back to the left to show January and click on the button "Back to current date". You will return to February but for a short moment, the two last rows will be shown as weeks from March. After a second, the calendar will change the layout and one of those two rows will be removed.

 

[Alexander Stolte]

Update

• 2.19
  • Add Designer Property FirstDayOfWeek
  • VisibleRangeChange and VisibleRangeChanged are now also triggered when you expand the calendar
  • BugFixes

I've discovered two bugs which are visible in the demo code.

should be work now

 

[wimpie3]

Another bug? Setting BodyColor or OtherMonthBackgroundColor or setOtherMonthBackgroundColor in B4XPage_Created results in

java.lang.IndexOutOfBoundsException: Invalid index 0, size is 0

Also, this:

ASCalendarAdvanced1.AddAppointmentType3(DateUtils.AddPeriod(DateTime.Now,p),xui.Color_ARGB(255,45, 136, 121),xui.Color_Magenta)

seems to be an allowed syntax? I'm not passing through an end date. This results in a weird visual behaviour (left side of the magenta color is rounded, right side is rectangular).

It also seems to be impossible to change the corner radius of Appointment type 3. This:

ASCalendarAdvanced1.AppointmentType3_ItemPropertiest.corner_radius=20dip

does not change anything?

Request: is it possible to add a horizontal alignment property for the labels in AppointmentType2 (left/center/right)?

 

[Alexander Stolte]

Update

• 2.20
  • BugFixes
  • Add TextAlignment_Horizontal property to AppointmentType2_ItemProperties - LEFT,RIGHT,CENTER
    • Default: CENTER

Setting BodyColor or OtherMonthBackgroundColor or setOtherMonthBackgroundColor in B4XPage_Created results in

java.lang.IndexOutOfBoundsException: Invalid index 0, size is 0

Had not checked internally if the calendar was already built, thus it tried to update the visual area that was not yet built.

seems to be an allowed syntax? I'm not passing through an end date. This results in a weird visual behaviour (left side of the magenta color is rounded, right side is rectangular).

A date is a "Long" datatype and a color an "Int", apparently he had no problem with the color, because it was a valid date.

does not change anything?

try it now.

Request: is it possible to add a horizontal alignment property for the labels in AppointmentType2 (left/center/right)?

added

 

[wimpie3]

Thank you, very cool you are so quick in adapting the code! I hope you don't mind the bug reports ?

 

[Alexander Stolte]

Only makes the product better

 

[wimpie3]

Only makes the product better

In that case, here is some new material

1. in the demo code, when you try to put the calendar in month mode by inserting

ASCalendarAdvanced1.expand

right after

ASCalendarAdvanced1.Updateall

I get a crash:

Error occurred on line: 382 (ASViewPager)
java.lang.IndexOutOfBoundsException: Invalid index 0, size is 0

2. it seems that the parameter setExtraItemGap is not doing anything at all. No matter what value I put there, nothing changes on the calendar.

New request 1: if I'm correct, the color/radius of the circle on TODAYs date cannot be modified (or perhaps I'm overlooking something?). What I'd like to do is to disable the indicator (I'm okay with using a transparent color if that's easier for you) and to show today's day number with a BOLD text property.

New request 2: add the possibility to play with the spacing between two rows. As you can see on the screenshot, the round bullets from the appointments are glued against the green color from the next week. Would be cool if some optional spacing could be inserted there.

 

[Alexander Stolte]

ASCalendarAdvanced1.Updateall

dont call this before you call "CreateCalendar"

 

[Cebuvi]

Hello.
I just sent a donation, thank you.

César

 

[Alexander Stolte]

2. it seems that the parameter setExtraItemGap is not doing anything at all. No matter what value I put there, nothing changes on the calendar.

Read the function descriptions.
"'sets the ExtraItemGab - is to prevent the font from covering the month number
'Default 6dip
'call CommitStyleChanges if you change the value"

6dip

20dip

 

[Alexander Stolte]

Update

• 2.21
  • CrashFix - UpdateBody
  • Add CurrentDateProperties - you can now customize the current date
    • TextColor
    • TextFont
    • IndicatorColor
    • IndicatorCornerRadius
    • IndicatorHeight
  • Add SelectedDateProperties - you can now customize the selected date indicator
    • IndicatorColor
    • IndicatorCornerRadius
    • IndicatorHeight
  • Add AppointmentType1_ItemProperties
    • Height
      • Default: 5dip
    • Padding
      • Default: 0dip

CurrentDateProperties
Turn this:

Into this:

with:

ASCalendarAdvanced1.CurrentDateProperties.TextFont = xui.CreateDefaultBoldFont(20)
ASCalendarAdvanced1.CurrentDateProperties.TextColor = xui.Color_Black
ASCalendarAdvanced1.CurrentDateProperties.IndicatorColor = xui.Color_ARGB(100,255,255,255)
ASCalendarAdvanced1.CurrentDateProperties.IndicatorCornerRadius = 5dip
ASCalendarAdvanced1.CommitStyleChanges

AppointmentType1_ItemPropertiest
Turn this:

Into this:

with:

ASCalendarAdvanced1.AppointmentType1_ItemPropertiest.Padding = 10dip
ASCalendarAdvanced1.AppointmentType1_ItemPropertiest.Height = 7dip

 

[wimpie3]

Thanks a lot! ?

 

[Cebuvi]

Hello,

I have copied ASViewPager version 1.27 into the folder Additional Libraries and I get this error.

Where is the problem?

Thanks.

 

[Alexander Stolte]

Where is the problem?

You need the ASViewPager.

[B4X] [XUI] AS ViewPager based on xCustomListView

Hey, thanks to @KZero for his good zPager class, i was able to extract a few things from it to make this cross platform view. I spend a lot of time in creating views, some views i need by my self, but some views not and to create a high quality view cost a lot of time. If you want to support...

www.b4x.com

 

[Cebuvi]

I already have ASVewPager in Additional Libraries.

I have downloaded the AS Viewpager example and it works perfectly.

 

[Alexander Stolte]

Strange, I downloaded the example and also compiled it once and everything works.
Also strange is that it wants a .jar file, the ASViewPager is a b4xlib