B4A Library [B4X] [XUI] AS Clock - Analog Clock or Digital

Thanks to @wonder for his nice "Analog Clock with Sound", this safes me a lot of time.

I spend a lot of time in creating views, like this and to create a high quality view cost a lot of time. If you want to support me and further views, then you can do it here by Paypal or with a coffee.

[B4X] AS RangeSlider + AS Clock = Sleep Schedule Picker

This is a short Example of what is possible with this 2 views. I spend a lot of time in creating views, like this and to create a high quality view cost a lot of time. If you want to support me and further views, then you can do it here by Paypal or with a coffee. :)...

www.b4x.com

ASClock
Author: Alexander Stolte
Version: 1.01

• ASClock
  • Fields:
    • mBase As B4XView
    • Tag As Object
  • Functions:
    • Class_Globals As String
    • CreateASClock_MiddleTextProperties (TextColor As Int, xFont As B4XFont) As ASClock_MiddleTextProperties
    • DesignerCreateView (Base As Object, Lbl As Label, Props As Map) As String
      Base type must be Object
    • Draw As String
    • getCornerColor As Int
    • getCornerWidth As Float
    • getInnerColor As Int
    • getMiddleText As String
    • getMiddleTextProperties As ASClock_MiddleTextProperties
    • getShowDialText As Boolean
    • getShowHourMark As Boolean
    • getShowMinutesMark As Boolean
    • Initialize (Callback As Object, EventName As String) As String
    • IsInitialized As Boolean
      Tests whether the object has been initialized.
    • setCornerColor (Color As Int) As String
    • setCornerWidth (CornerWidth As Float) As String
    • setInnerColor (Color As Int) As String
    • setMiddleText (Text As String) As String
    • setShowDialText (Show As Boolean) As String
    • setShowHourMark (Show As Boolean) As String
    • setShowMinutesMark (Show As Boolean) As String
    • SetTime (Hour As Int, Mins As Int, Secs As Int) As String
  • Properties:
    • CornerColor As Int
    • CornerWidth As Float
    • InnerColor As Int
    • MiddleText As String
    • MiddleTextProperties As ASClock_MiddleTextProperties [read only]
    • ShowDialText As Boolean
    • ShowHourMark As Boolean
    • ShowMinutesMark As Boolean
• ASClock_MiddleTextProperties
  • Fields:
    • IsInitialized As Boolean
      Tests whether the object has been initialized.
    • TextColor As Int
    • xFont As B4XFont
  • Functions:
    • Initialize
      Initializes the fields to their default value.

Changelog

• 1.00
  • Release
• 1.01
  • Add get and set ScaleColor
  • Add get and set SweepHands
• 1.02
  • Add Designer Property ClockMode - 12 and 24
    • Default: 12
    • If 24 then the clock displays 1-24
    • If 12 then the clock displays 1-12
• 1.03 (read more)
  • Add SleepDuration to ClockMode

Have Fun

 

[JohnC]

I wonder if this can be used with watches running Google Wear.

 

[Alexander Stolte]

I wonder if this can be used with watches running Google Wear.

You can try it

 

[rgarnett1955]

Thanks to @wonder for his nice "Analog Clock with Sound", this safes me a lot of time.

I spend a lot of time in creating views, like this and to create a high quality view cost a lot of time. If you want to support me and further views, then you can do it here by Paypal.

View attachment 124098View attachment 124099View attachment 124100View attachment 124101View attachment 124102

[B4X] AS RangeSlider + AS Clock = Sleep Schedule Picker

This is a short Example of what is possible with this 2 views. I spend a lot of time in creating views, like this and to create a high quality view cost a lot of time. If you want to support me and further views, then you can do it here by Paypal or with a coffee. :)...

www.b4x.com

ASClock
Author: Alexander Stolte
Version: 1.00

• ASClock
  • Fields:
    • mBase As B4XView
    • Tag As Object
  • Functions:
    • Class_Globals As String
    • CreateASClock_MiddleTextProperties (TextColor As Int, xFont As B4XFont) As ASClock_MiddleTextProperties
    • DesignerCreateView (Base As Object, Lbl As Label, Props As Map) As String
      Base type must be Object
    • Draw As String
    • getCornerColor As Int
    • getCornerWidth As Float
    • getInnerColor As Int
    • getMiddleText As String
    • getMiddleTextProperties As ASClock_MiddleTextProperties
    • getShowDialText As Boolean
    • getShowHourMark As Boolean
    • getShowMinutesMark As Boolean
    • Initialize (Callback As Object, EventName As String) As String
    • IsInitialized As Boolean
      Tests whether the object has been initialized.
    • setCornerColor (Color As Int) As String
    • setCornerWidth (CornerWidth As Float) As String
    • setInnerColor (Color As Int) As String
    • setMiddleText (Text As String) As String
    • setShowDialText (Show As Boolean) As String
    • setShowHourMark (Show As Boolean) As String
    • setShowMinutesMark (Show As Boolean) As String
    • SetTime (Hour As Int, Mins As Int, Secs As Int) As String
  • Properties:
    • CornerColor As Int
    • CornerWidth As Float
    • InnerColor As Int
    • MiddleText As String
    • MiddleTextProperties As ASClock_MiddleTextProperties [read only]
    • ShowDialText As Boolean
    • ShowHourMark As Boolean
    • ShowMinutesMark As Boolean
• ASClock_MiddleTextProperties
  • Fields:
    • IsInitialized As Boolean
      Tests whether the object has been initialized.
    • TextColor As Int
    • xFont As B4XFont
  • Functions:
    • Initialize
      Initializes the fields to their default value.

Changelog

• 1.00
  • Release

Have Fun

Hi,

I like your clock.

I added a couple of features:

1. Control the color of the scale indications. They were defaulted to white so you had to have a dark themed clock to see them
2. Created an option to "sweep" the hour and minute hands to remove ambiguity when the minute hand is near twelve.

I haven't provided programmable settings for these so they are only available through the designer.

If you like these mods you can update your code and maybe add in functions for programming these new properties.

Best regards
Rob

 

[Alexander Stolte]

Update

• 1.01
  • Add get and set ScaleColor
  • Add get and set SweepHands

I like your clock.

thanks!

I added a couple of features:

I did not copy all the code, you changed the pointer size, I did not copy this change.

 

[Lello1964]

Hi Alexander,
i want use AsRangeSlider + Asclock lib to set Alarm on off period.

But if i want set alarm on from 00:00 to 7:00 (ON) -- 1' period
13:00 to 15:00 (ON) -- 2' period
19:00 to 23:59 (ON) -- 3' period

In Italy time is based 24h, can you add 24h time dispaly to clock ?, fro 00 to 24 h

Raffaele

 

[Alexander Stolte]

In Italy time is based 24h, can you add 24h time dispaly to clock ?, fro 00 to 24 h

In Germany too. Try it, you will see its 24h, you need to over scroll to reach the 12-23:59

 

[Lello1964]

In Germany too. Try it, you will see its 24h, you need to over scroll to reach the 12-23:59

yes

 

[Lello1964]

to set alarm is't good.

I'ts better show time from 00:00 to 24:00

 

[Alexander Stolte]

I'ts better show time from 00:00 to 24:00

I will try, but not today.

 

[Lello1964]

Like this

 

[Lello1964]

only 00:00 24:00 time not single segment

 

[Lello1964]

maybe a new lib idea for alam setting.

 

[Alexander Stolte]

Update

• 1.02
  • Add Designer Property ClockMode - 12 and 24
    • Default: 12
    • If 24 then the clock displays 1-24
    • If 12 then the clock displays 1-12

 

[Theera]

How to adjust size of middleText? if I need smaller ,or bigger.

 

[Alexander Stolte]

How to adjust size of middleText? if I need smaller ,or bigger.

    ASClock1.MiddleTextProperties.xFont = xui.CreateDefaultFont(60)
    ASClock1.Draw

 

[dank]

I have a question about the analog hour hand. I would like it to move like it does on my watch. For example, at 2:30, the hour hand should be half way between 2 and 3. Is it possible with this library? Thanks.

 

[Alexander Stolte]

I have a question about the analog hour hand. I would like it to move like it does on my watch. For example, at 2:30, the hour hand should be half way between 2 and 3. Is it possible with this library? Thanks.

No idea what you mean. Download it, set the time to 2:30 and see if it looks the way you want.

 

[Alexander Stolte]

Update

• 1.03
  • Add SleepDuration to ClockMode

i call it "SleepDuration" because i need it to display a sleep duration and I don't know what else I should have called it.
It simply displays 0-23 in increments of 3

 

[winjiadh]

sometimes the clock once 2 seconds