Power Builder - Objetos trasparentes

 
Vista:

Objetos trasparentes

Publicado por ViBoRa (7 intervenciones) el 06/01/2004 16:43:50
Hola amigos, les deseo lo mejor para este año que recien comienza, para ustedes y familia.
Mi consulta es la siguiente: existe alguna forma de dejar los objetos con su backcolor o background trasparentes? mi pregunta surge debido a que los windows los tengo de cierto color y me gustaria que los objetos que agrego tengan un fondo trasparente.. o que asuman el color del windows, ya que puedo tener N label por ejemplo, y a cada una le tengo que colocar el mismo color del windows.
se debe incluir alguna libreria?
gracias a todos..
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Objetos trasparentes

Publicado por Jorge Luis (91 intervenciones) el 07/01/2004 15:47:52
Para el fondo transparente en static text es necesario crear un NVO, a continuación copia el código y guárdalo con el nombre st_uo_transparent.sru y lo importas a tu librería, luego insertas este UserObject en tu ventana y listo es transparente...........................
$PBExportHeader$st_uo_transparent.sru
forward
global type st_uo_transparent from statictext
end type
end forward
global type st_uo_transparent from statictext
int Width=251
int Height=72
string Text="None"
Alignment Alignment=Center!
string FaceName="System"
FontCharSet FontCharSet=Ansi!
event ue_paint pbm_paint
end type
global st_uo_transparent st_uo_transparent

type variables
boolean ib_Painting
end variables

event ue_paint;if IsValid(this) then

if ib_Painting then return 0
ib_Painting = TRUE
this.visible = false
do while yield() ; loop
this.visible = true
ib_painting=false
end if
return 0
end event
event constructor;call super::constructor;this.BackColor = 2^29
end event
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar