Any sample about splitter in resources and Vertical button?

Any sample about splitter in resources and Vertical button?

Postby Rochinha » Thu Sep 11, 2008 1:50 pm

Hi,

I need a sample of splitter with resources and how to make a button with Vertical text.

Example:
Code: Select all  Expand view
+---+
|   |
| N |
| A |
| M |
| E |
|   |
+---+
+---+
|   |
| P |
| H |
| O |
| N |
| E |
|   |
+---+
Rochinha
 
Posts: 310
Joined: Sun Jan 08, 2006 10:09 pm
Location: Brasil - Sao Paulo

Fonts

Postby ukoenig » Thu Sep 11, 2008 3:48 pm

Hello,

To draw fonts like this on a bitmap, you have to do calculations.
For each char of the text, you have to calculate the position
inside a bitmap to get the text vertical centered.
There is no standard for this.
For the moment, the tools can do the needed calculation for you.

My next project will be a < button-creator > for Fivewin,
there i want to make it possible, that the user can create buttons like these, you are looking for.

About splitters, you can find some samples in FWH/samples/

Image

For the calculation you can use the VTOOLS.
Inside the application is a button : < PRG > to get the source for the calculation.
You have to add :
< oBmp:bLClicked := {|| Msgalert( "Your action" ) } >,
because the BMP is used as Titels and not as a button.
The function < OnPaintV > you will find in the source.

Code: Select all  Expand view

REDEFINE BITMAP oBmp ID 110 ADJUST RESOURCE "Blanc"  OF oDlg
oBmp:bLClicked := {|| Msgalert( "Your action" ) }

oBMP:bPainted := { |hDC|OnPaintV( hDC,oBMP, ;
13003573,15779475,16777215, ;
"Vertical-Text Button ", ;
oBfont1, 0 ,"TEST.BMP" ,3 ) }



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

If you still need more informations, just tell me.

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 59 guests