not run
Antonio I with the style of Button class on Win10 but with bmp
there is a bug- Code: Select all Expand view
@ 233, 118 BTNBMP oBtnOK RESOURCE "DLG_OK" ;
PROMPT "&Conferma" FLAT SIZE 45,15 LEFT PIXEL OF oDlg ;
COLOR CLR_BLACK,CLR_WHITE GRADIENT bGrad2015 NOROUND;
ACTION ( oDlg:end( IDOK ) )
@ 233, 182 BTNBMP oBtnCan RESOURCE "DLG_NO" ;
PROMPT "&Annulla" FLAT SIZE 45,15 LEFT PIXEL OF oDlg ;
COLOR CLR_BLACK,CLR_WHITE GRADIENT bGrad2015 NOROUND;
ACTION ( oDlg:end( IDCANCEL ) ) GDIPLUS
oBtnOK:lBorder :=(IIF(!oBtnOK:lMOver,.t.,.f.))
oBtnOK:nClrBorder := (IIF(oBtnOK:lMOver,CLR_GRAY,))
oBtnOK:oCursor := oCursorHand
oBtnCan:lBorder :=(IIF(!oBtnCan:lMOver,.t.,.f.))
oBtnCan:nClrBorder := (IIF( oBtnCan:lMOver,CLR_GRAY,))
oBtnCan:oCursor := oCursorHand
I wrote
NOROUND and it make a border with round angles ...why ?
this is only button this is btnbmp with no resource but with noround @ 233, 118 BTNBMP oBtnOK ;
PROMPT "&Conferma" FLAT SIZE 45,15 LEFT PIXEL OF oDlg NOROUND;
COLOR CLR_BLACK,CLR_WHITE GRADIENT bGrad2015 ;
ACTION ( oDlg:end( IDOK ) )
this is with resource allways NOROUND @ 233, 118 BTNBMP oBtnOK RESOURCE "DLG_OK" ; //
PROMPT "&Conferma" FLAT SIZE 45,15 LEFT PIXEL OF oDlg NOROUND;
COLOR CLR_BLACK,CLR_WHITE GRADIENT bGrad2015 ;
ACTION ( oDlg:end( IDOK ) )
If I erase FLat then I have a bad button ...
but if I set NOROUND why I have
a round button ?
at the end I made
oBtnOK:nRound:= 0
oBtnCan:nRound:= 0
and I have this result
but it is no good