DIALOGO TRANSPARENTE

[jponce]

Hola buenos días

Quisiera hacer una consulta, como puedo hacer un dialogo transparente?

En este nueva versión de Fivewin intente hacer algo como esto REDEFINE BUTTON ID 40 OF oDlg 2007 ACTION Msginfo("hola") para ver si pone el botón de otra forma, habrá skins para este tipo de Botón ? o solo se puede en BTNBMP.


Atentamente
Julio Ponce

[armando.lagunas]

buen día:

yo utilizo esta función para hacer transparentes los diálogos , en la clausula ON INIT coloca SetTransparent( oDlg, 238 )

ngrado va desde 0 a 255 donde si es menor el dialogo se hace mas invisible junto a todos los controles que esten dentro del dialogo

Code: Select all

#define AW_BLEND       524288  
#define GWL_EXSTYLE       -20

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 cordiales