B4A Library [B4X] AS WheelDateTimePicker - based on ASWheelPicker

This is a date and time picker in IOS picker design.

This library is based on the ASWheelPicker, without it the library will not work.

[B4X] [XUI] AS WheelPicker - Spinner - a modern single/multiple choice picker view - based on xCustomListView [Payware]

Hello, this is a modern wheel picker, like the IOS-PickerView. WheelPicker/Spinner This library is not free, because, it cost a lot of time and gray hair to create such views. https://payhip.com/b/IvqnN Thanks for your understanding. :) V3.00-Preview B4I-Preview - looks nicer and smoother in...

www.b4x.com

Use:

AS_WheelDateTimePicker1.Create

Spoiler: Properties, Functions, Events, etc.

AS_WheelDateTimePicker
Author: Alexander Stolte
Version: 1.17

• AS_WheelDateTimePicker
  • Events:
    • CustomDrawItemChange (NewItem As ASWheelPicker_CustomDraw, OldItem As ASWheelPicker_CustomDraw)
    • SelectedDateChanged (Date As Long)
    • SelectedTimeChanged (Hour As Int, Minute As Int)
  • Fields:
    • mBase As B4XView
    • Tag As Object
  • Functions:
    • Create
    • CreateASWheelDateTimePicker_MonthName (January As String, February As String, March As String, April As String, May As String, June As String, July As String, August As String, September As String, October As String, November As String, December As String) As ASWheelDateTimePicker_MonthName
    • CreateASWheelDateTimePicker_MonthNameShort (January As String, February As String, March As String, April As String, May As String, June As String, July As String, August As String, September As String, October As String, November As String, December As String) As ASWheelDateTimePicker_MonthNameShort
    • CreateASWheelDateTimePicker_WeekNameShort (Monday As String, Tuesday As String, Wednesday As String, Thursday As String, Friday As String, Saturday As String, Sunday As String) As ASWheelDateTimePicker_WeekNameShort
    • DesignerCreateView (Base As Object, Lbl As Label, Props As Map)
      Base type must be Object
    • Initialize (Callback As Object, EventName As String)
    • Refresh
    • SetDateTextOrder (WeekName As Int, MonthName As Int, DayOfMonth As Int)
      Weekname - Fri
      Monthname - Jun
      DayOfMonth - 19
      Example:1,2,3 = Fri Jun 19
      Example:2,1,3 = Jun Fri 19
      Example:3,2,1 = 19 Jun Fri
  • Properties:
    • BackgroundColor As Int
    • Date As Long
    • DisabledTextColor As Int
    • FadeColor As Int
    • HapticFeedback As Boolean
    • Hour As Int
    • HourShortText As String
    • MaxDate As Long
    • MinDate As Long
    • Minute As Int
    • MinuteShortText As String
    • MinuteSteps As Int
    • MonthName As ASWheelDateTimePicker_MonthName
    • MonthNameShort As ASWheelDateTimePicker_MonthNameShort
    • PickerType As String
      Call Refresh if you change something
    • PickerType_DatePicker As String [read only]
    • PickerType_TimePicker As String [read only]
    • SelectorColor As Int
    • ShowAMPM As Boolean
      Show the AM and PM column
    • ShowDate As Boolean
      Show the date column in the TimePicker
    • ShowTimeDivider As Boolean
      The separator between hour and minute is usually a colon ( : )
    • ShowTimeUnit As Boolean
      Display time unit (12hour 05 min) can be changed with the HourShort and MinuteShort property
    • TextColor As Int
    • Theme As AS_WheelDateTimePicker_Theme [write only]
    • Theme_Dark As AS_WheelDateTimePicker_Theme [read only]
    • Theme_Light As AS_WheelDateTimePicker_Theme [read only]
    • ThemeChangeTransition As String
      Fade or None
    • ThemeChangeTransition_Fade As String [read only]
    • ThemeChangeTransition_None As String [read only]
    • TodayText As String
      Call Refresh if you change something
    • WeekNameShort As ASWheelDateTimePicker_WeekNameShort
    • WheelPicker As ASWheelPicker [read only]

Changelog

Spoiler: Version 1.0-1.16

• 1.00
  • Release
• 1.01
  • BugFixes
• 1.02
  • Add set Hour
  • Add set Minute
  • Add set Date
• 1.03
  • Add Refresh
• 1.04
  • BugFixes
  • PickerType = DatePicker - The days in the month now adjust automatically
  • Add Designer Property TextColor
  • Add Designer Property FadeColor
  • Add Designer Property HapticFeedback
• 1.05
  • Add Designer Property TodayText
    • Default: Today
  • Add get and set TodayText - Call Refresh if you change something
• 1.06
  • BugFixes
• 1.07
  • BugFixes - AM and PM mode works now as expected
  • BugFixes - setDate Number of days is now adjusted
• 1.08
  • Add get and set FadeColor
  • Add get and set TextColor
  • Add get and set SelectorColor
  • Add get and set BackgroundColor
  • MonthName now comes from the DateUtils
• 1.09
  • BugFixes
• 1.10
  • BugFixes
• 1.11
  • Add Designer Property MinuteSteps - 1-5-10-15 Block Interval
    • Default: False
• 1.12
  • BugFixes
• 1.13
  • Add get WheelPicker - gets the wheelpicker to modify font etc.
• 1.14 (read more)
  • You need AS_WheelPicker V3.15+ for this update
  • If a month has 30 or 28 days, then these are now no longer removed from the list, but the new EnabledRow is used and the affected items are deactivated.
    • This prevents the list from behaving in an unusual way.
  • Add MinDate and MaxDate - You can specify a DateRange what may be selected
• 1.15
  • You need AS_WheelPicker V3.20+
  • Breaking Change: You need to call Create
    • The view will not be built without it
    • Now you can make changes to the proepties without calling refresh at the beginning
    • Faster loading time
    • No crashes
  • Add SetDateTextOrder - You can change the text order of the date text
  • BugFixes
  • Add Event CustomDrawItemChange
• 1.16
  • New Themes - You can now switch to Light or Dark mode
    • New set Theme
    • New get Theme_Dark
    • New get Theme_Light
  • New Designer Property ThemeChangeTransition
    • Default: Fade

• 1.17
  • New all designer properties, now as get and set too
  • New designer property descriptions
  • BugFixes
• 1.18
  • B4A BugFix

Have Fun

 

[Alexander Stolte]

edit: Alexander, looks like the test project is too large to upload here, tell me where and I'll send you directly.

Delete the "object" folder then it should be small enough

 

[marcick]

Here it is

 

[Alexander Stolte]

works fine here in release mode. I saved a file in the first page -> open the second page -> save a file again -> works fine
Did you have the newest AS_WheelPicker version?

 

[marcick]

works fine here in release mode. I saved a file in the first page -> open the second page -> save a file again -> works fine
Did you have the newest AS_WheelPicker version?

uhmm .... I think yes. 3.21
And B4A 12.80

 

[Alexander Stolte]

uhmm .... I think yes. 3.21
And B4A 12.80

Hmm, all up to date

 

[marcick]

The crash is only in release mode, both on a real device and Android Studio emulator

 

[marcick]

 

[Alexander Stolte]

And what is the error message?

 

[marcick]

And what is the error message?

As I click on "save file" this is the error:

RDC total: 0 records, time = 0.208 sec
** Activity (main) Pause event (activity is not paused). **
*** Service (starter) Create ***
** Service (starter) Start **
** Activity (main) Create (first time) **
Call B4XPages.GetManager.LogEvents = True to enable logging B4XPages events.
** Activity (main) Resume **
** Activity (main) Pause event (activity is not paused). **
java.lang.RuntimeException: android.os.TransactionTooLargeException: data parcel size 654596 bytes
Bundle stats:
  android:viewHierarchyState [size=654332]
    android:views [size=653732]
PersistableBundle stats:
  [null]
    at android.app.servertransaction.PendingTransactionActions$StopInfo.run(PendingTransactionActions.java:146)
    at android.os.Handler.handleCallback(Handler.java:958)
    at android.os.Handler.dispatchMessage(Handler.java:99)
    at android.os.Looper.loopOnce(Looper.java:205)
    at android.os.Looper.loop(Looper.java:294)
    at android.app.ActivityThread.main(ActivityThread.java:8177)
    at java.lang.reflect.Method.invoke(Native Method)
    at com.android.internal.os.RuntimeInit$MethodAndArgsCaller.run(RuntimeInit.java:552)
    at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:971)
Caused by: android.os.TransactionTooLargeException: data parcel size 654596 bytes
    at android.os.BinderProxy.transactNative(Native Method)
    at android.os.BinderProxy.transact(BinderProxy.java:584)
    at android.app.IActivityClientController$Stub$Proxy.activityStopped(IActivityClientController.java:1439)
    at android.app.ActivityClient.activityStopped(ActivityClient.java:96)
    at android.app.servertransaction.PendingTransactionActions$StopInfo.run(PendingTransactionActions.java:135)
    ... 8 more

 

[marcick]

Library abandoned, thank you.

 

[Alexander Stolte]

Library abandoned, thank you.

What do you mean with "abandoned" ?

 

[marcick]

I mean I abandon this library because doesn’t suit my needing and has problems (but it works at your home so, peace and love). I come back to standard spinner and date picker. Thanks for your support.

 

[Alexander Stolte]

TransactionTooLargeException

The problem lies with the device. The DatePicker adds a large number of items to the list so that you can select 2 years into the past and 2 years into the future.
And can be solved by using the "MinDate" property before calling ".Create". And give this e.g. the value DateTime.Now, then the list is smaller and your device does not get into a memory problem.

I abandon this library because doesn’t suit my needing

If it doesnt suit your needing, then do it with the AS_WheelPicker with your own items?

Thanks for your support.

No Problem.

 

[marcick]

Understand.
why didn’t you give before this explanation if you knew it ?
I like much the appearance of your picker that looks like IOS style and I’m distributing the App for both platforms (better if it has the same look) but I have to abandon it for these reasons:

1. We are in Italy and I want the date time is represented as we in Italy are used to
2. In my application I can’t limit the time span. I could limit the future to today (there are no data to show for the future) but two years in the past is also not enough.
   

 

[Alexander Stolte]

why didn’t you give before this explanation if you knew it ?

Because I had a lot to do privately and had no opportunity to check on the PC?

but two years in the past is also not enough.

Then a normal DatePicker is more suitable, as a user I would not want to scroll through over 730 days to select a date that is more than 2 years in the past.

 

[Alexander Stolte]

We are in Italy and I want the date time is represented as we in Italy are used to

Italy has the same date format as Germany. But it is simply not possible to redesign the whole thing in a view which is a 2 in 1 view so that everything is dynamic, especially if you can only work with index. A custom solution would be much better.

 

[MarcoRome]

Hi dear.
I use rel. 3.23 WheelPicker and rel.1.15 As_WheelDateTimePicker
I have this code:

Sub B4XPage_Appear
    
    AS_WheelDateTimePicker3.Date = DateTime.Now
    AS_WheelDateTimePicker3.Hour = DateTime.GetHour(DateTime.Now)
    AS_WheelDateTimePicker3.Minute = DateTime.GetMinute(DateTime.Now)
    
    AS_WheelDateTimePicker3.MinDate = DateTime.Now + DateTime.TicksPerDay
    AS_WheelDateTimePicker3.MaxDate = DateTime.Now + DateTime.TicksPerDay*5
        
        
    AS_WheelDateTimePicker3.MonthNameShort =      AS_WheelDateTimePicker3.CreateASWheelDateTimePicker_MonthNameShort("Gen","Feb","Mar","Apr","Mag","Giu","Lug","Ago","Set","Ott","Nov","Dic")
    AS_WheelDateTimePicker3.WeekNameShort = AS_WheelDateTimePicker3.CreateASWheelDateTimePicker_WeekNameShort("Lun","Mar","Mer","Gio","Ven","Sab","Dom")
    AS_WheelDateTimePicker3.Refresh
End Sub

The minimum date is respected, the maximum date continues regardless of the line code

AS_WheelDateTimePicker3.MaxDate = DateTime.Now + DateTime.TicksPerDay*5

Where i wrong ?

 

[Alexander Stolte]

I use rel. 3.23 WheelPicker and rel.1.15 As_WheelDateTimePicker
I have this code:

Sub B4XPage_Appear

AS_WheelDateTimePicker3.Date = DateTime.Now
AS_WheelDateTimePicker3.Hour = DateTime.GetHour(DateTime.Now)
AS_WheelDateTimePicker3.Minute = DateTime.GetMinute(DateTime.Now)

AS_WheelDateTimePicker3.MinDate = DateTime.Now + DateTime.TicksPerDay
AS_WheelDateTimePicker3.MaxDate = DateTime.Now + DateTime.TicksPerDay*5


AS_WheelDateTimePicker3.MonthNameShort = AS_WheelDateTimePicker3.CreateASWheelDateTimePicker_MonthNameShort("Gen","Feb","Mar","Apr","Mag","Giu","Lug","Ago","Set","Ott","Nov","Dic")
AS_WheelDateTimePicker3.WeekNameShort = AS_WheelDateTimePicker3.CreateASWheelDateTimePicker_WeekNameShort("Lun","Mar","Mer","Gio","Ven","Sab","Dom")
AS_WheelDateTimePicker3.Refresh
End Sub

The minimum date is respected, the maximum date continues regardless of the line code

AS_WheelDateTimePicker3.MaxDate = DateTime.Now + DateTime.TicksPerDay*5

Where i wrong ?

Hi, please make a new thread for any questions you have. And please provide an example project that shows all your settings and the behavior. Thank you very much, have a good start into the week.

 

[Alexander Stolte]

Update

• 1.16
  • New Themes - You can now switch to Light or Dark mode
    • New set Theme
    • New get Theme_Dark
    • New get Theme_Light
  • New Designer Property ThemeChangeTransition
    • Default: Fade

Theming

AS_WheelDateTimePicker1.Theme = AS_WheelDateTimePicker1.Theme_Light

AS_WheelDateTimePicker1.Theme = AS_WheelDateTimePicker1.Theme_Dark

 

[Alexander Stolte]

Update

• 1.17
  • New all designer properties, now as get and set too
  • New designer property descriptions
  • BugFixes