xBrowse Header : Themes

xBrowse Header : Themes

Postby TimStone » Mon Nov 12, 2007 5:16 pm

Is it possible to have the xbrowse header respond to the themes as with other controls ( message bar, menus, etc ), or is it possible to paint the header with a gradient ( like tsbrowse ) ?
Tim Stone
http://www.MasterLinkSoftware.com
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit
User avatar
TimStone
 
Posts: 2904
Joined: Fri Oct 07, 2005 1:45 pm
Location: Trabuco Canyon, CA USA

Postby StefanHaupt » Tue Nov 13, 2007 8:37 am

Tim,

to paint the header with a gradient change these lines in the class TXBrwColumn, Method PaintHeader()

Code: Select all  Expand view
//FillRect( hDC, {nRow, nCol, nRow + nHeight, nCol + nWidth}, hBrush )

to
Code: Select all  Expand view
Gradient (hDC, {nRow, nCol, nRow+nHeight, nCol+nWidth}, aColors[2],nRGB(245,245,245), .t.) // SH

and then before drawing the text:

Code: Select all  Expand view
SetBkMode (hDC, 1)     // transparent SH
   DrawTextEx( hDC, cHeader,....... )


The second color is hardcoded at the moment, there would have been to many changes in the class.
kind regards
Stefan
StefanHaupt
 
Posts: 824
Joined: Thu Oct 13, 2005 7:39 am
Location: Germany

xBrowse Header Gradient

Postby TimStone » Tue Nov 13, 2007 4:46 pm

Thanks ... that gets me started.
Tim Stone
http://www.MasterLinkSoftware.com
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit
User avatar
TimStone
 
Posts: 2904
Joined: Fri Oct 07, 2005 1:45 pm
Location: Trabuco Canyon, CA USA

Postby Silvio » Wed Nov 14, 2007 12:07 am

this run ok but the BITmap not are trasparent !!!!!!!!!!!

Image
Best Regards, Saludos

Falconi Silvio
User avatar
Silvio
 
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Postby Antonio Linares » Wed Nov 14, 2007 1:09 am

You have to paint the bitmaps using FWH TransBmp() function
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41315
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby nageswaragunupudi » Wed Nov 14, 2007 5:33 am

XBrowse with Gradient Fill

Image

Works on 32-bt and 16-bit colors
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10248
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Postby Silvio » Wed Nov 14, 2007 10:53 am

Antonio you said
>You have to paint the bitmaps using FWH TransBmp() function
have you an idea or where i must modify it ?


Thanks
Best Regards, Saludos

Falconi Silvio
User avatar
Silvio
 
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Postby Antonio Linares » Wed Nov 14, 2007 11:16 am

Silvio,

Make a search for TransBmp() in FWH PRGs :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41315
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Maurilio Viana » Wed Nov 14, 2007 3:30 pm

>> XBrowse with Gradient Fill

Great, Nageswaragunupudi!!!
can you share with us how do it?

Regards,
Maurilio
User avatar
Maurilio Viana
 
Posts: 252
Joined: Tue Oct 25, 2005 2:48 pm
Location: Garça/Garza/Heron City - Brazil

Postby Antonio Linares » Wed Nov 14, 2007 4:08 pm

Maurilio,

We are going to include it in FWH 7.12 and its better if there is just one version around, so it will be easier for tech support.

Just wait a few days and it will be available, thanks
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41315
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby nageswaragunupudi » Wed Nov 14, 2007 4:24 pm

I fully agree with Mr. Antonio. The FWH sample shot released is excellent. I am eagerly awaiting 7.12.

I have to say that my code is amateurish and works just as a stop gap arrangement till I get 7.12, It is better for all of us to stick to official release by FWH
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10248
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Postby Maurilio Viana » Wed Nov 14, 2007 5:55 pm

Antonio, thanks a lot! I'd not seen post about this xBrowse new feature.
Do you plan implement Office look to other classes?

Regards
Maurilio
User avatar
Maurilio Viana
 
Posts: 252
Joined: Tue Oct 25, 2005 2:48 pm
Location: Garça/Garza/Heron City - Brazil

Postby Antonio Linares » Wed Nov 14, 2007 6:44 pm

Maurilio,

Yes, we plan to use the Office 2007 look as much as possible
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41315
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Silvio » Thu Nov 15, 2007 8:41 am

this is another class

Image

We made another class to create brush with two color gradient
With this class we can translate all brush of all classes !!!
Best Regards, Saludos

Falconi Silvio
User avatar
Silvio
 
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Postby Silvio » Thu Nov 15, 2007 9:12 am

Antonio ,
where I can see the parameters of transbmp() function ?
Best Regards, Saludos

Falconi Silvio
User avatar
Silvio
 
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Next

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 82 guests