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

Alexander Stolte · Dec 23, 2021

Update

2.18
- Removes log messages that should not be there

MarcoRome · Dec 24, 2021

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

B4X:

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.

B4X:

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

B4X:

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

B4X:

....
ASCalendarAdvanced1.Close

Sleep(100)

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

Colin Evans · Jan 17, 2022

Hi, I've donated, cheers Colin

james_sgp · Feb 2, 2022

Donation made...

wimpie3 · Feb 9, 2022

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 · Feb 9, 2022

Update

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

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

should be work now

wimpie3 · Feb 9, 2022

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

B4X:

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

Also, this:

B4X:

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:

B4X:

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 · Feb 9, 2022

Update

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

wimpie3 said:
Setting BodyColor or OtherMonthBackgroundColor or setOtherMonthBackgroundColor in B4XPage_Created results in

B4X:

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.

wimpie3 said:
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.

wimpie3 said:
does not change anything?

try it now.

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

added

wimpie3 · Feb 9, 2022

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

Alexander Stolte · Feb 9, 2022

Only makes the product better

wimpie3 · Feb 10, 2022

Alexander Stolte said:
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

B4X:

ASCalendarAdvanced1.expand

right after

B4X:

ASCalendarAdvanced1.Updateall

I get a crash:

B4X:

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 · Feb 10, 2022

wimpie3 said:
ASCalendarAdvanced1.Updateall

dont call this before you call "CreateCalendar"

Cebuvi · Feb 10, 2022

Hello.
I just sent a donation, thank you.

César

Alexander Stolte · Feb 10, 2022

wimpie3 said:
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 · Feb 10, 2022

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:

B4X:

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:

B4X:

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

wimpie3 · Feb 10, 2022

Thanks a lot! ?

Cebuvi · Feb 11, 2022

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 · Feb 11, 2022

Cebuvi said:
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 · Feb 11, 2022

I already have ASVewPager in Additional Libraries.

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

Alexander Stolte · Feb 11, 2022

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

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

Expert

Expert

Active Member

Active Member

Well-Known Member

Expert

Well-Known Member

Expert

Well-Known Member

Expert

Well-Known Member

Expert

Active Member

Expert

Expert

Well-Known Member

Active Member

Expert

Active Member

Expert

Privacy & Transparency

Privacy & Transparency