I need a sample of splitter with resources and how to make a button with Vertical text.
Example:
- Code: Select all Expand view RUN
+---+
| |
| N |
| A |
| M |
| E |
| |
+---+
+---+
| |
| P |
| H |
| O |
| N |
| E |
| |
+---+
+---+
| |
| N |
| A |
| M |
| E |
| |
+---+
+---+
| |
| P |
| H |
| O |
| N |
| E |
| |
+---+
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 ) }
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 36 guests