Static Function Barra2()
lOCAL oFontDATE,oSay[2]
DEFINE FONT oFontDATE NAME "Verdana" SIZE 0,-20 BOLD
DEFINE BUTTONBAR oApp:oBarDate _3D SIZE 42, 50 OF oApp():oWndMain 2007
@ 0.3,2 SAY oSay[1] PROMPT "DAL" OF oApp:oBarDate FONT oFontDATE SIZE 45, 15 PIXEL
@ 0.3,15 DTPICKER dDataIniziale OF oApp:oBarDate SIZE 200,30 FONT oFontDATE
@ 0.3,22 SAY oSay[2] PROMPT "AL" OF oApp:oBarDate FONT oFontDATE SIZE 45, 15 PIXEL
@ 0.3,60 DTPICKER dDataFinale OF oApp:oBarDate SIZE 200,30 VALID dDataIniziale<=dDataFinale FONT oFontDATE ;
ON CHANGE (oAPP:oDlg:UPDATE(),oAPP:oDlg:REFRESH() )
DEFINE BUTTON OF oApp:oBarDate NAME "XP_EXIT2" ACTION (oApp:oBarDate:END(),oApp():oDlg:End(), oApp():oBar:show() )
oSay[1]:lTransparent = .T.
oSay[2]:lTransparent = .T.
FixSays( oApp:oBarDate:hWnd )
Return nil
WHY THE SAYS CONTROLS NOT ARE TRASPARENT ?