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

[dongsool]

There's been an error has occurred.

I've added all the libraries I need.



B4A Version: 10.60
Parsing code. (0.07s)
Java Version: 11
Building folders structure. (0.03s)
Running custom action. (0.10s)
Compiling code. Error
Error compiling program.
Error description: Unknown member: addpageat
Error occurred on line: 327
xASVP_Horizontal.AddPageAt(0,xpnl_background,"")
Word: addpageat

 

[Alexander Stolte]

Error description: Unknown member: addpageat

Make sure you are using ASViewPager V1.10+

was also in the email that you should update the ASViewPager.
Thanks

[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

 

[dongsool]

Thank you. It's resolved.

 

[iz0ndg]

Maybe there is a bug, in the 7-day display if, in the example, I press the button "back to the current date", the days of the week are desynchronized (example today is 04/14/2021 Wednesday if I press the button back to 14 but puts it on Monday)

 

[Alexander Stolte]

Youre right, I fix it as fast as I can.

 

[iz0ndg]

Youre right, I fix it as fast as I can.

Appears to be linked to both "ShowFirstWeekOfMonthInFirstRow" and "Back2CurrentDate"

 

[Alexander Stolte]

Appears to be linked to both "ShowFirstWeekOfMonthInFirstRow" and "Back2CurrentDate"

The bug was in the "Scroll2Date" function, I updated the library in the 1st post.

 

[iz0ndg]

The bug was in the "Scroll2Date" function, I updated the library in the 1st post.

The bug persist if ShowFirstWeekOfMonthInFirstRow is false and month visible

 

[Alexander Stolte]

The bug persist if ShowFirstWeekOfMonthInFirstRow is false and month visible

fixed

 

[iz0ndg]

fixed

Perfect ! Tks ?

 

[Alexander Stolte]

Update
1.07

• SetAppointmentType1 renamed to AddAppointmentType1
• BugFix on VisibleRangeChanged
• Add GetDaysBetween2Dates - Returns a list of dates at a special day in a week e.g. all sundays between 2 dates
• Add AddSpecialDay - Adds a new special day
  • Add CommitSpecialDays - Commits all new visible special dates
  • Add SpecialDayExists - Returns True if a special day is already added to a date
  • Add GetSpecialDayAt - Gets a ASCalendarAdvanced_SpecialDay object on a date if exists
  • Add RemoveSpecialDay - Removes a special day

Example:
Mark all sundays as a special day

Sub ASCalendarAdvanced1_VisibleRangeChanged(StartDate As Long,EndDate As Long)
    Dim sundays As List = ASCalendarAdvanced1.GetDaysBetween2Dates(StartDate,EndDate, 1)
    For Each s As Long In sundays
        ASCalendarAdvanced1.AddSpecialDay(s,xui.Color_ARGB(255,221, 95, 96),"official_holiday")
    Next
    ASCalendarAdvanced1.CommitSpecialDays
End Sub

Special days can have different colors and you can give each one an identifier so you know what kind of special day it is on that day.

 

[MarcoRome]

Hi Alexander. You have my donation Transaction: 2BV44284158154301
Good Job !!! ? ?
Can you send this address devilapp.eu@gmail.com
Thank you again for your effort

 

[Alexander Stolte]

Good Job !!! ? ?

Thanks, if you have any issue, then tell me.

Can you send this address

i forwarded it to this email, i was too fast.

 

[Alexander Stolte]

small sneak preview, to the new update, which comes next week.

It still needs a bit of work to make everything work together and look good, but the 1st steps are done.

 

[MarcoRome]

small sneak preview, to the new update, which comes next week.
View attachment 111877
It still needs a bit of work to make everything work together and look good, but the 1st steps are done.

Hi dear @Alexander Stolte. The new version is ready ?
Thank you
Marco

 

[Alexander Stolte]

The new version is ready ?

Theoretically, the version is usable so far, but currently overlaps are not yet considered in the new appointment type.
Practically, I'm implementing the library in a project of mine right now and I'm finding new bugs that need to be fixed before I can update.

I am confident to be able to update soon, currently I can only work on my projects for a few hours in the evening.

 

[MarcoRome]

Hi Alexander
I would like to understand how much space it occupies when the object is expanded (50%y) ?
Thank you

 

[Alexander Stolte]

I would like to understand how much space it occupies when the object is expanded (50%y) ?

That depends on a few things.
it is difficult to explain.
Example:

• View Height = 50dip
• Expandable = False (no drag panel on bottom)
• Body Item Height in Percentage (Designer Property) = 50 (if you set it to 60% then the header height will be smaller and the items height will be bigger)
  • 50% of the view height = 25dip for the header
  • Body Items has now the other 50% = 25dip
    • If the view is expanded, then the total height of the view is:
      • 50dip + 25dip*4 (*4 because we have show 4 more weeks) = 150dip

if you have Expandable = True, then 15dip (BottomPanel Height in default) will be subtracted from the item height, you have to take this into account when you set the size of the view in the designer.

I hope I have been able to explain it to some extent.
In the next update a function will be added, with which you can read the expanded view height, without that the view must be expanded.

 

[MarcoRome]

What i do for Remove Appointment Type ( RemoveAppointmentType1 not exist ) ?
Thank you

 

[MarcoRome]

There is a way to reset the calendar in order to delete events, appointments, etc. ?