Codejock Developer Community : SOLVED:How can i put current oclock in statusbar

SOLVED:How can i put current oclock in statusbar : you're welcome

Fri, 12 Mar 2010 05:37:51 +0000

Author: younicke
Subject: 16405
Posted: 12 March 2010 at 5:37am

you're welcome

SOLVED:How can i put current oclock in statusbar : Dear Younicke your code is Ok...

Fri, 12 Mar 2010 03:07:05 +0000

Author: unforgiven
Subject: 16405
Posted: 12 March 2010 at 3:07am

Dear Younicke
your code is Ok and work fine.
I appreciate for your reply

SOLVED:How can i put current oclock in statusbar : Private Sub Form_Load() .... Dim...

Thu, 11 Mar 2010 17:54:52 +0000

Author: younicke
Subject: 16405
Posted: 11 March 2010 at 5:54pm

Private Sub Form_Load()
    ....

    Dim Pane As StatusBarPane

    Set Pane = CommandBars.StatusBar.AddPane(ID_INDICATOR_TIME)
    Pane.Alignment = xtpAlignmentCenter
    Pane.Text = DateTime.Time
    Pane.Width = 0

    ....
End Sub

Private Sub CommandBars_Update(ByVal Control As XtremeCommandBars.ICommandBarControl)
    Set Pane = CommandBars.StatusBar.FindPane(ID_INDICATOR_TIME)
    Pane.Text = DateTime.Time
End Sub

SOLVED:How can i put current oclock in statusbar : for showing date i use this code...

Thu, 11 Mar 2010 13:43:36 +0000

Author: unforgiven
Subject: 16405
Posted: 11 March 2010 at 1:43pm

for showing date i use this code on form_load event:

Dim StatusBar As IStatusBar
    Set StatusBar = CommandBars.StatusBar

    StatusBar.Visible = True
    Dim Pane As StatusBarPane

    Set Pane = StatusBar.AddPane(ID_DATE_PANE)
    Pane.Visible = True
    Pane.Text = " Today : " & Date
    Pane.Width = 0

it's work fine,but for showing current time, i got error
--------------------------------------------------------
with this code i can show time in statusbar,but time is fixed and not change second of it,what's the problem?

Private Sub CommandBars_Update(ByVal Control As XtremeCommandBars.ICommandBarControl)
Select Case Control.Id
Case ID_TIME_PANE
CommandBars.StatusBar.FindPane(ID_TIME_PANE).Text = Time$
End Select

please put code or trim my code to solve this problem
thanks

SOLVED:How can i put current oclock in statusbar : I know that you can use the following...

Thu, 11 Mar 2010 12:49:44 +0000

Author: cmm2006
Subject: 16405
Posted: 11 March 2010 at 12:49pm

I know that you can use the following codes to add (CAPS, NUM,...):

    StatusBar.AddPane ID_INDICATOR_CAPS
    StatusBar.AddPane ID_INDICATOR_NUM
    StatusBar.AddPane ID_INDICATOR_SCRL

is there any way that we can add time or date (ID_INDACATOR_TIME, ID_INDICATOR_DATE) ?

Thank you

SOLVED:How can i put current oclock in statusbar : no more timer control needed.....

Thu, 11 Mar 2010 08:26:32 +0000

Author: younicke
Subject: 16405
Posted: 11 March 2010 at 8:26am

no more timer control needed.. just the update event of the commandbars.

define the statusbar panes in the form load event
and in the updateevent of the commandbars search
for the pane that you want to show the current time
and then replace the text with the current time

SOLVED:How can i put current oclock in statusbar : Hi, Don't add new pane on...

Thu, 11 Mar 2010 07:59:42 +0000

Author: Oleg
Subject: 16405
Posted: 11 March 2010 at 7:59am

Hi,

Don't add new pane on each run - Find pane you added before and update its text.

SOLVED:How can i put current oclock in statusbar : Hi younick as you told i use update...

Thu, 11 Mar 2010 03:15:34 +0000

Author: unforgiven
Subject: 16405
Posted: 11 March 2010 at 3:15am

Hi younick
as you told i use update event but i face to error:

Private Sub CommandBars_Update(ByVal Control As XtremeCommandBars.ICommandBarControl)
Dim StatusBar As IStatusBar
Dim Pane As StatusBarPane
Set Pane = StatusBar.AddPane(ID_TIME_PANE)
Pane.Text = Time$
End Sub
----------------
to show current time i use timer control

Private Sub timehoure_Timer()
On Error Resume Next
If Label2.Caption <> CStr(Time) Then
Label2.Caption = Time$
End If
End Sub

pls put right code or trim my code
thanks

SOLVED:How can i put current oclock in statusbar : just use the update event of the...

Wed, 10 Mar 2010 18:36:09 +0000

Author: younicke
Subject: 16405
Posted: 10 March 2010 at 6:36pm

just use the update event of the commandbars and change the caption of the statusbar pane with the current time

SOLVED:How can i put current oclock in statusbar : I want to put current time in...

Wed, 10 Mar 2010 10:00:12 +0000

Author: unforgiven
Subject: 16405
Posted: 10 March 2010 at 10:00am

I want to put current time in statusbar,but i can't how can i do that?
is there any way to put time in statusbar .
current time show in control timer.
I don't know how can i use of timer control to combine statusbar
thaks all