FiveTech Software tech support forums

Estimados, he activado la transparencia en xbrowse, hay alguna forma de hace un grado opacidad,
con tpanel hay una data

::oPanel1:nOpacity := 240

Carlos:

Te sirve hacer la opacidad al DIALOG?.
Saludos

Para versiones antiguas.

como se usa :

armando.lagunas wrote:Para versiones antiguas.

como se usa :

Code: Select all

...
ACTIVATE DIALOG xDlg NOMODAL ON INIT  SetTransparent( xDlg, 230 ) // rango 0 a 255      0 = invisible 255= sin transparencia


...

//----------------------------------------------------------------------

FUNCTION SetTransparent( oDlg, nGrado )

   SetWindowLong( oDlg:hWnd, GWL_EXSTYLE, nOr( GetWindowLong( oDlg:hWnd, GWL_EXSTYLE ), AW_BLEND ) )
   SetLayeredWindowAttributes( oDlg:hWnd, 0, nGrado, 2 )

 RETURN Nil

//----------------------------------------------------------------------


Saludos


 

xDlg:nOpacity := 230
does the same thing and requires just one line of code, instead of the above code.

carlos vargas wrote:Estimados, he activado la transparencia en xbrowse, hay alguna forma de hace un grado opacidad,
con tpanel hay una data

::oPanel1:nOpacity := 240

We provided nOpacity feature to TPanel but not to XBrowse.