FiveTech Support Forums

I'm a bit puzzled. I'm using the TToolbar class, and I expected to see the theme applied to it ... but it doesn't appear to be. I can see that the toolbar background on your newly updated preview class responds to the theme.

Is there a setting I'm missing or is it not supported in 7.07 ?

Tim

Tim,

You should have themes support on the toolbar if you are including the themes manifest file in your rc file:

1 24 "WindowsXP.Manifest"

You can find that file at samples\winxp

Antonio,

I have themes working on virtually everything else. However, I'm getting a flat color for the toolbar.

Tim

Tim,

Just a thought. I know you said you are using TToolbar, can you confirm that you are indeed using TToolbar and not FW's own buttonbar (TBar class)?

Also, have you tryed it under XP to see if it is a Vista issue only?

I have never used TToolbar so I don't know what the behavior is.

James

Good morning,

Yes, I'm using tToolbar. I was advised to do this by Antonio a couple of years ago. So ...

The following is the start of the code:

// First create the ImageList object for all the bitmaps
oImageList := TImageList():New( 28, 28 ) // width and height of bitmaps
// Now create the toolbar object for adding the buttons
oToolBar := TToolBar():New( oWnd, 30, 32, oImageList )

From here I actually add the buttons with the following lines:

  oImageList:AddMasked( TBitmap():Define( "CLIP",    , oWnd ), nRGB( 255, 255, 255 ) )
  oToolBar:AddButton( { || PRO100M( )}, "Workorders", ) // "Work" )

Yes, the same result is seen in XP

Tim,

Please try samples\rebars.prg. It should look ok with themes.

It seems that higher toolbars don't get the theme look. If you build samples\ToolBar1.prg you'll see that it looks like yours.

So toolbars doesn't work properly...

Tim

OK ... resolved the problem by putting it onto a tReBar with oPanel ... but is there a way to set the baloon style like what you used ?

Got it ... thanks ... all is now working well !

Antonio

Is there a way of setting "BALLOON" as default tooltip style ?

Richard

For the toolbars, you need to modify the class in this line:

::lTTBalloon := lTTBalloon // change this into .T.

For other tooltips, modify Class TWindow here:

     hWnd = CreateToolTip( Self:hWnd, cToolTip ) // , .t. ) for ballon tooltips !

Antonio ...
The sample has a vertical doted line ... how is that formed.

Also, you have a dark, full height, separator but the XP format is a shorter, lighter, line vertically centered. Is there a fix or setting to attain that capability.