xBrowse Gradient-Background

xBrowse Gradient-Background

Postby ukoenig » Fri Jul 24, 2009 10:06 pm

Hello,

because of the new xBrowse-Background-Functions ( stretching ),
I finished my Tool to define any Gradient, resize and save as BMP
and test as xBrowse-Background.
For a xBrowse-Test, You can load any saved Gradient-BMP from the
Sub-Directory /Images and add Font and Fontcolor.
It also can be used, for a quick Gradient-Array Define
or just get the Color-Values.
The Gradient-Array You can copy from the Bottom of the Gradient-Preview.
I still have to add Font and Fontcolor for the xBrowse-Test.
As soon it is finished, I will put it on this place for Download.

I noticed : without Footer, the Background is not stretched completely to the Bottom
of the Browser ( You can see this in the xBrowse-Preview, it shows a small 2 mm tiled Part )
Much better to see in Screenshot 2, there is the last Row shown tiled.

The Gradient-Tool :
Image

The xBrowse-Preview :
Image

Image

Best Regards
Uwe :lol:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: xBrowse Gradient-Background

Postby hag » Sat Jul 25, 2009 5:28 am

Where can I get the background tool?
Thank you
Harvey
hag
 
Posts: 598
Joined: Tue Apr 15, 2008 4:51 pm
Location: LOs Angeles, California

Re: xBrowse Gradient-Background

Postby ukoenig » Sat Jul 25, 2009 6:00 am

Harvey,

I think it will be finished this Weekend for Download.
Font-Select and Color-Select for xBrowse-Test, I have still to add.

Best Regards
Uwe :lol:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: xBrowse Gradient-Background

Postby hag » Sat Jul 25, 2009 6:19 am

The colors in the browse look great. I look forward to testing it.
Thank you
Harvey
hag
 
Posts: 598
Joined: Tue Apr 15, 2008 4:51 pm
Location: LOs Angeles, California

Re: xBrowse Gradient-Background

Postby ukoenig » Sat Jul 25, 2009 8:08 am

Hello Harvey,

I added the Font and Fontcolor-Define for the xBrowse-Test.
Still any ideas, to add something ?

Image

Best Regards
Uwe :roll:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: xBrowse Gradient-Background

Postby Antonio Linares » Sat Jul 25, 2009 12:59 pm

Uwe,

As of now, stretching background image is working perfectly in case of xbrowse created from code both in windows and dialogs, but not in xbrowse created from resource.

In case of browse created from resource, stretch is working only in the area occupied the data cells, and rest of the area is
pained tiled. This is fixed in version 9.07 under release.
regards, saludos

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

Re: xBrowse Gradient-Background

Postby ukoenig » Sat Jul 25, 2009 3:11 pm

Antonio,

Thank You very much for the Information.
For the Tool, I use only Resources.
I think, using a Photo ( many Colors ), nobody will notice it.
It is just the Gradient-BMP, where 2 Colors are used.
I will finish the Tool this Weekend and make a Update after the new FWH-release.

Best Regards
Uwe :lol:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: xBrowse Gradient-Background

Postby ukoenig » Sun Jul 26, 2009 3:21 pm

Antonio,

carry on with testing, I noticed the following with
oBrw:SetBackGround( cFile, BCK_STRETCH )

Image

Loading the Dialog with a new Image, it works only with ON INIT.
Loading a Image from inside the Dialog, it is OK.

------------------------------------
DBSELECTAREA(2)
REDEFINE XBROWSE oBrw ID 110 OF oDlg5 AUTOCOLS ALIAS "Customer"

Doesn't work at Start !!! ( only from inside the Dialog ).
The Image is shown Tiled.
-----------------------------------------------------------------
oBrw:SetBackGround( cFile, BCK_STRETCH )

oBrw:nColDividerStyle := LINESTYLE_BLACK
oBrw:nRowDividerStyle := LINESTYLE_BLACK
oBrw:nMarqueeStyle := MARQSTYLE_HIGHLROW
oBrw:bClrSel = { || { 0, 16314573 } }
AEval( oBrw:aCols, { |o| o:oDataFont := oFONT } )
oBrw:bClrStd := { || { D_TCOLOR, 15724527 } }
------------------------------------

Include it in ON INIT, it works stretched at Dialog-Start.
-----------------------------------------------------------------
ACTIVATE DIALOG oDlg5 CENTERED ;
ON INIT oBrw:SetBackGround( cFile, BCK_STRETCH ) ;
ON PAINT( SETUP_GRAD( hDC, oDlg5 ), ;
GradBrush( oDlg5, { { 0.2, 15180357, 16379082 },;
{ 0.2, 16379082, 15180357 } }, 1 ) )

Image

The Quality gets completely lost ( color-depth ) with BCK_STRETCH :
( The left Picture-Area shows the difference )
Image
The Quality stays the same, using BCK_TILED :
Image

Best Regards
Uwe :roll:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: xBrowse Gradient-Background

Postby ukoenig » Mon Jul 27, 2009 1:07 pm

I defined :

REDEFINE XBROWSE oBrw1 ID 110 OF oDlg6 AUTOCOLS ALIAS "Desktop"

oBrw1:nColDividerStyle := LINESTYLE_BLACK
oBrw1:nRowDividerStyle := LINESTYLE_BLACK
oBrw1:nMarqueeStyle := MARQSTYLE_HIGHLROW
AEval( oBrw1:aCols, { |o| o:oDataFont := oFONT } )

oBrw1:SetBackGround( cFile1, BCK_TILED )

oBrw1:bClrSelFocus = { || { 16777215,128 } } // White / Red
oBrw1:bClrSel = { || { 16777215,8388608 } } // White / Blue
oBrw1:bClrStd := { || { 0, 65535 } } // Black / Yellow


Result ( didn't work, colors ignored ) :

Focus :
Image

Lost Focus :
Image

I changed the Position ( works ) :

oBrw1:bClrSelFocus = { || { 16777215,128 } } // White / Red
oBrw1:bClrSel = { || { 16777215,8388608 } } // White / Blue
oBrw1:bClrStd := { || { 0, 65535 } } // Black / Yellow


oBrw1:SetBackGround( cFile1, BCK_TILED )

Focus :
Image

Lost Focus :
Image

Best Regards
Uwe :lol:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 90 guests