I have problems with the new BTNBMP class
This is the first that I cann replicate , it works with FW9.01 :
- Code: Select all Expand view
- #include "FiveWin.ch"
static oWnd
//----------------------------------------------------------------//
function Main()
local oBmp
DEFINE WINDOW oWnd TITLE "Text on a bitmap"
@ 1,1 BTNBMP oBmp OF oWnd ;
SIZE 203 , 120 FILE "..\bitmaps\fivetech.bmp" ADJUST ;
NOBORDER PROMPT " OK with 9.01 " ;
ACTION MsgInfo("Hello")
ACTIVATE WINDOW oWnd
return nil
The problem is the hfont ,
in fact with the follows code it works ,
but I have the secon problem , the command CENTER, RIGHT ecc. dosn't works.
- Code: Select all Expand view
- #include "FiveWin.ch"
static oWnd
//----------------------------------------------------------------//
function Main()
local oBmp,oFont
DEFINE FONT oFont NAME "MS SANS SERIF" SIZE 8,24
DEFINE WINDOW oWnd TITLE "Text on a bitmap"
@ 1,1 BTNBMP oBmp OF oWnd ;
SIZE 203 , 120 FILE "..\bitmaps\fivetech.bmp" ADJUST ;
NOBORDER PROMPT " OK with 9.01 " ; //TAVOLI
FONT oFont center ;
ACTION MsgInfo("Hello")
ACTIVATE WINDOW oWnd
return nil
Regards MAurizio