Android Question [B4X] AS DatePicker possible bug

[Aldo's]

Using the library in question I inserted the following code to have a calendar that starts with Sunday.

    DateTime.DateFormat="dd/MM/yyyy"
    DateTime.SetTimeZone(1)
    dpData.MinDate=DateTime.DateParse("01/12/2019")
    dpData.MaxDate=DateTime.DateParse("02/12/2051")
    dpData.FirstDayOfWeek=6
    dpData.WeekNameShort=dpData.CreateASDatePicker_WeekNameShort("DO","LU","MA","ME","GI","VE","SA")
    dpData.MonthNameShort=dpData.CreateASDatePicker_MonthNameShort("Gen","Feb","Mar","Apr","Mag","Giu","Lug","Ago","Set","Ott","Nov","Dic")
    dpData.Refresh

Going from March to April it performs a strange display by repeating the empty month of March and putting only a few days of April. In the following months the situation did not recover.
Is this a bug?

 

[Alexander Stolte]

dpData.FirstDayOfWeek=6

If you change this property outside of the designer, then you need to call ".Rebuild" and not "Refresh"

 

[Aldo's]

If you change this property outside of the designer, then you need to call ".Rebuild" and not "Refresh"

I wrote:

    DateTime.DateFormat="dd/MM/yyyy"
    DateTime.SetTimeZone(1)
    dpData.MinDate=DateTime.DateParse("01/12/2019")
    dpData.MaxDate=DateTime.DateParse("02/12/2051")
    dpData.FirstDayOfWeek=6
    dpData.Rebuild
    dpData.WeekNameShort=dpData.CreateASDatePicker_WeekNameShort("DO","LU","MA","ME","GI","VE","SA")
    dpData.MonthNameShort=dpData.CreateASDatePicker_MonthNameShort("Gen","Feb","Mar","Apr","Mag","Giu","Lug","Ago","Set","Ott","Nov","Dic")
    dpData.Refresh

and I got the following error:
Error occurred on line: 699 (ASViewPager)
*** -[__NSArrayM objectAtIndex:]: index 12 beyond bounds for empty array
Stack Trace: (
CoreFoundation 1B48137D-6256-3164-9EC3-124F0AA34B77 + 935812
libobjc.A.dylib objc_exception_throw + 56
CoreFoundation CFSetContainsValue + 0

 

[Alexander Stolte]

dpData.Rebuild

If you call this, then you dont need to call:

dpData.Refresh

Set all the settings you want to make and then call .Rebuild. If you call up .Rebuild and then .Refresh immediately afterwards, it will run into an error because it takes a while to build the list.

 

[Aldo's]

I also tried this:

    DateTime.DateFormat="dd/MM/yyyy"
    DateTime.SetTimeZone(1)
    dpData.MinDate=DateTime.DateParse("01/12/2019")
    dpData.MaxDate=DateTime.DateParse("02/12/2051")
    dpData.WeekNameShort=dpData.CreateASDatePicker_WeekNameShort("DO","LU","MA","ME","GI","VE","SA")
    dpData.MonthNameShort=dpData.CreateASDatePicker_MonthNameShort("Gen","Feb","Mar","Apr","Mag","Giu","Lug","Ago","Set","Ott","Nov","Dic")
    dpData.Refresh

setting the First Day of Week as Designer.
The behavior is the same.

 

[Alexander Stolte]

I see the error, I have to change something internally.

 

[Aldo's]

I see the error, I have to change something internally.

Thanks.
If it is useful to you, if you choose the month from the year it no longer causes any problems.

 

[Alexander Stolte]

Try the version in the attachement, thanks

 

[Aldo's]

Try the version in the attachement, thanks

I tried with B4I and it still doesn't work as it should.

 

[Alexander Stolte]

I have also tested it with B4I, but more detailed information would be helpful.

 

[Aldo's]

I have also tested it with B4I, but more detailed information would be helpful.

In March, when I press the right arrow to go to April, it shows me at the top (as if they were the first days of the month) only the 29th and 30th of April. If I press again to go to May, it always shows me up from the 27th to the 31st... and so on for the following months.

 

[Alexander Stolte]

DateTime.SetTimeZone(1)

That is the mistake. Not the library.

If I comment this out, everything works perfectly.

 

[Alexander Stolte]

Don't understand why you have to set a time zone.
It is not recommended:

DateTime.SetTimeZone

DateTime.SetTimeZone should affect the conversions of dates to ticks and viceversa: Is it correct? If so, where is my error in this code? Dim AbsTicks As Long = AbsDateTicks(DateTime.Now) '------------------------------------------------ Sub AbsDateTicks(DateTicks As Long) As Long Dim...

www.b4x.com

SetTimeZone(0) before every DateTime methode?

SetTimeZone(0) before every DateTime method? Hi all I am trying this code and the result of c is not 01:00:00 if the timezone of my device is not 0. Dim a As Long Dim b As Long Dim c As Long a = DateTime.Now b = a - DateTime.TicksPerHour Log (DateTime.Time(a)) Log...

www.b4x.com

 

[Aldo's]

Don't understand why you have to set a time zone.

Because if I don't put it it recognizes the difference between the time zone of the system and that of the control. I need a perfect value at 0:00:00 because I build an index with it. However, I try to remove that value and correct the value for building the index from the code.
I'll try and tell you.

 

[Aldo's]

I tried. It makes everything look right but it skips April, then September, then February 2025...

 

[Aldo's]

I put version 1.27 of the library back and everything works perfectly.
Thank you very much.