![]() |
StatusBar |
Post Reply ![]() |
Author | |
StephenW ![]() Groupie ![]() ![]() Joined: 21 November 2007 Location: United Kingdom Status: Offline Points: 34 |
![]() ![]() ![]() ![]() ![]() Posted: 21 November 2007 at 6:50am |
I have recently started to upgrade the interface of a VB6 application. The SkinFramework is very impressive and instantly transforms the look of the product. I have a couple of questions that I hope someone can point me in the right direction with : 1. I have removed the VB6 status bar and added one of your XtremeCommandBars.StatusBar controls. I can add panes to this and have the text I require. I cannot figure out however what controls the light / dark blue shading applied to the panes (light blue on the left hand side), or how to get seperator bars as used in Word 2007. 2. I would like to be able to add a clickable pane to the status bar, of which I can control the visibility. I cannot seem to add the click event for the status bar such that it ever fires. Is this possible to do easily ?
|
|
![]() |
|
Oleg ![]() Admin Group ![]() Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
![]() ![]() ![]() ![]() ![]() |
Hi,
1. Sorry, seems for ActiveX version, you can't control it :( We will add it
2. You don't receive PaneClick event ?
|
|
Oleg, Support Team
CODEJOCK SOFTWARE SOLUTIONS |
|
![]() |
|
StephenW ![]() Groupie ![]() ![]() Joined: 21 November 2007 Location: United Kingdom Status: Offline Points: 34 |
![]() ![]() ![]() ![]() ![]() |
When you say you will add it I assume this is for the next version release. What sort of timescales are normally involved for your releases so I have an idea on when I may be able to use this please ?
The paneclick event : No I dont receive it, but it may well be that I am doing something wrong.
1. I have an MDI form and have added a CommandBars control to it called objCommandbars. 2. In the MDIForm_Load event I add the status bar with a few panes (shown 1 pane added as an example) :
Dim objStatusBar As XtremeCommandBars.StatusBar
Dim objStatusBarPane As XtremeCommandBars.StatusBarPane ' Create a status bar and show it
Set objStatusBar = objCommandbars.StatusBar objStatusBar.RemoveAll objStatusBar.Visible = True ' Add the panes for it Set objStatusBarPane = objStatusBar.AddPane(ID_STATUSBAR_REPORT) objStatusBarPane.Width = 96 objStatusBarPane.Style = SBPS_NOBORDERS objStatusBarPane.Alignment = xtpAlignmentLeft objStatusBarPane.Text = "Test" 3. Now I have added an event handler for the click event of the status bar :
Private Sub StatusBar_PaneClick(ByVal Pane As XtremeCommandBars.StatusBarPane)
Debug.Print "PaneClick. Id = "; Pane.ID End Sub 4. If I breakpoint this event and click the statusbar, all over it, it never triggers. It may well be the definition I have used for the event being incorrect, but I am unsure if this is the case or not.
Many thanks
|
|
![]() |
|
StephenW ![]() Groupie ![]() ![]() Joined: 21 November 2007 Location: United Kingdom Status: Offline Points: 34 |
![]() ![]() ![]() ![]() ![]() |
Will you get a chance to look at this soon please ?
|
|
![]() |
|
Oleg ![]() Admin Group ![]() Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
![]() ![]() ![]() ![]() ![]() |
You didn't add WithEvents keyword:
Public WithEvents StatusBar As XtremeCommandBars.StatusBar |
|
Oleg, Support Team
CODEJOCK SOFTWARE SOLUTIONS |
|
![]() |
|
StephenW ![]() Groupie ![]() ![]() Joined: 21 November 2007 Location: United Kingdom Status: Offline Points: 34 |
![]() ![]() ![]() ![]() ![]() |
Doh!
Sorry, of course, its fine now.
|
|
![]() |
Post Reply ![]() |
|
Tweet
|
Forum Jump | Forum Permissions ![]() You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |