BarTools Vers. 1.2 ( Update - Download )

BarTools Vers. 1.2 ( Update - Download )

Postby ukoenig » Wed Jul 01, 2009 5:26 pm

Hello,

I finished the new Bartools, to create any Buttonbars with Alpha-Bmp's.
It looks a bit like the Button-tools but more options are included in the Setup-section.
I'm still working on a Help-file, like for the Button-Tools.

Now, the Tool-Collection is nearly complete :

xBrowse-Tools
Button-Tools
Background-Tools
Bar-Tools
Image-Tools
Via-Coral Title-Tools

What You can do :
---------------------
A Setup-Section to select the Button-images and define Window- and Bar-backgrounds.
Select up to 5 different Button-Images for the Buttonbar. ( subdirectory /Project is used for Images )
Define any Background for the Main-Window.
Define a new Gradient for the Buttonbar ( Bar-Colours < 0 > will use the blue Basic-Gradient with 2007-Style )
If You save a Gradient for a Buttonbar to the Ini-File, the values are allways selected at start,
( Button BMP's and Gradient ) until You reset back to 0 ( Blue Basic-Gradient ).
There is a double use of Gradient-settings ( Bar and Window )
To get different Gradient-Styles, You can first save the Bar-gradient to a Ini-File and than change it for the Window.
Buttonbar-Position-Tests of TOP, LEFT, RIGHT, BOTTOM.
Create the Source and Exe-File ( please check the Path-defines in the Make-file ).
Change the Start-Screen of the Program with any Background You like.
Bar-Resize ( Height and Button-Width ) and much more ...

There are two not solved small problems :
1. Position Bar-BOTTOM shows wrong Display
2. Changing the Bar-Gradient, 2007-Style is lost ( only works with the original Gradient ).

Still missing a Font-define ( Size ) it is included in the Tools, but still not working.
The Font-Color works.

The Main-Window :
Image

The Setup-Section :
Image

2 Buttonbars, created with the Tools :
Image
Image

After saving the Buttonbar-Gradient and no Gradient-change for the Window,
a Gradient-Display will show the same Gradient for Window and Buttonbar.
Image

Download :
http://www.pflegeplus.com/fw_downloads/bartools1.zip

Best Regards
Uwe :lol:
Last edited by ukoenig on Sat Jul 04, 2009 12:47 pm, edited 1 time in total.
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: BarTools Vers. 1.2 ( Update-Download )

Postby ukoenig » Sat Jul 04, 2009 11:16 am

Hello,

I found the reason for the missing Mouse-Caption-Color ( my mistake ).
If You define Your own Gradient and the 2. Gradient-Combination is missing,
the Mouse-Caption is Transparent without define =>( oBar1:bClrGrad = { | lInvert | If( ! lInvert, ; )
I don't use a Gradient for the Mousecapture, I think it looks better with just one Color.
There is a Update, using these 2 Options and Wordpad.exe as Texteditor.
The new FREEIMAGE.dll is included as well.

Image

Image

Mouse-Caption Transparent :

IF B_COLOR1 > 0 .and. B_COLOR2 > 0
oBar1:bClrGrad = { || { { B_MOVE, B_COLOR1, B_COLOR2 }, { B_MOVE, B_COLOR2, B_COLOR1 } }
ENDIF

Mouscaption uses the 1. Gradient-Color for Button-Background

IF B_COLOR1 > 0 .and. B_COLOR2 > 0
oBar1:bClrGrad = { | lInvert | If( ! lInvert, ;
{ { B_MOVE, B_COLOR1, B_COLOR2 }, { B_MOVE, B_COLOR2, B_COLOR1 } }, ;
{ { B_MOVE, B_COLOR1, B_COLOR1 }, { B_MOVE, B_COLOR1, B_COLOR1 } } ) }
ENDIF

If You want to use 2 different Gradients for ButtonBar and Dialog, don't forget to save
Your 1. Gradient-setting for the Buttonbar, otherwise Dialog- and Bargradient will be the same.
Image
The Buttonbar is stored to a INI-File and will be allways the same, until You change the Settings.

Changing the Font, is only possible with a change in Class BtnBmp
The Result of a Size-change to 14
Image
Code: Select all  Expand view

      ::l2007 = ::oWnd:l2007
         if ::oWnd:oFont != nil
            if ::oWnd:oFont:cFaceName != "Tahoma"
               DEFINE FONT oFont NAME "Tahoma" SIZE 0, -11
               ::oWnd:SetFont( oFont )
            endif
            ::SetFont( ::oWnd:oFont )
         else
            DEFINE FONT oFont NAME "Tahoma" SIZE 0, -11
            ::oWnd:SetFont( oFont )
            ::SetFont( oFont )
         endif
 


Download
http://www.pflegeplus.com/fw_downloads/bartools2.zip

Best Regards
Uwe :lol:
Last edited by ukoenig on Sat Jul 04, 2009 8:52 pm, edited 1 time in total.
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: BarTools Vers. 1.2 ( Update - Download )

Postby hag » Sat Jul 04, 2009 7:31 pm

Your bartools is great. Is it available in harbour?
Thank you
Harvey
hag
 
Posts: 598
Joined: Tue Apr 15, 2008 4:51 pm
Location: LOs Angeles, California

Re: BarTools Vers. 1.2 ( Update - Download )

Postby ukoenig » Sat Jul 04, 2009 8:48 pm

Hello Harvey,

I don't understand exactly Your question.
Do You mean a different Source-Output ?

There is still a small extension I added :
The Colorpicker is included now, to convert any Color to RGB-values.
If You like it, You can download again ( no Version-change ).

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: BarTools Vers. 1.2 ( Update - Download )

Postby hag » Sat Jul 04, 2009 10:46 pm

The program uses xharbour libs. I use harbour not xharbour. Do you have one that uses harbour libs.
Thank you
Harvey
hag
 
Posts: 598
Joined: Tue Apr 15, 2008 4:51 pm
Location: LOs Angeles, California

Re: BarTools Vers. 1.2 ( Update - Download )

Postby ukoenig » Sat Jul 04, 2009 11:26 pm

Hello Harvey,

I think it is possible, to add a Question to the Source-Button
how to create/compile for Harbour or xHarbour.
It could be a option, to add to the other Tools as well.
I'm still waiting for the next FWH-release, maybe something
can be done better ( the Font-define and the go Bottom-problem ).

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: wartiaga and 91 guests